\x の代替は chr (Unicode リテラル)

なんかMixi で上がってたけど，なかなか思い付かなそうなので，
こっちにも書いとく．

use Test::More tests => 1;

my $hoge1 = "FF330";
my $hoge2 = ???;             # ここに何書く？

my $expect = "\x{FF330}";

is($hoge2, $expect);

で，perldoc perluniintro を見たら，chr がいいよって書いてあった．

参考

• http://perldoc.jp/docs/perl/5.10.0/perluniintro.pod の Creating Unicode のあたり
• http://gist.github.com/302482

そもそも hex が思い付かなかった人なので，hex とか pack がすぐわかる人を尊敬する．