euc-jpの環境で下記のファイルを作成しました。
--- sample.pl ---
#!/usr/bin/perl
my $a = "こんにちわ";
print $a . "\n";
---

そのファイルで、下記を実行すると、日本語部分が "\数字3文字" に変換されます。
（実行すれば）
perl -MO=Deparse sample.pl

--- 実行結果 ---
my $a = "\244\263\244\363\244\313\244\301\244\357";
print $a . "\n";
sample.pl syntax OK
---

日本語部分だけは変換せずにそのままにしたい場合、どのようにすれば良いでしょうか？