1
4

2 に答える 2

4

あなたがしたい

print "Character for $num is: ", chr($num), "\n";
于 2012-12-21T09:27:56.053 に答える
-3

次のように書くことができます:

foreach $num (2660..2670)
{
        print "Character for $num  is:",eval(qq!\"\\x{$num} \\n\"!);
}

元のプログラムの問題は、perl が "\x{...}" を評価できないことです。これは、この評価が $num の補間の前に行われるためです。

于 2012-12-21T07:52:05.753 に答える