perlで改行など特殊文字が含まれるものをDumpする時は

最近テストをしていて、全く同じ文字列に見えるのに、テストが通らないという事例がありました。今回は\tとか\rとか特殊文字が入っていて文字列が一致しないという事例でした。

特殊文字とかを見える形でするのはどうすればいいのだろうと思っていたら、Data::Dumperでそういう機能がありました。

my $str = "hoge\tfuga\n";
use Data::Dumper;
$Data::Dumper::Useqq = 1;
warn Dumper($str);
# $VAR1 = "hoge\tfuga\n";

便利ですね。