note
quester
<p>Data::Dump::Streamer can do that:</p>
<code>
use Modern::Perl;
use Data::Dump::Streamer;
my $x= "cr-\15, lf-\12, tab-\11, bs-\10";
say Dump $x;
</code>
<p>prints</p>
<code>$VAR1 = "cr-\r, lf-\n, tab-\t, bs-\b";</code>
<p>or as a one-liner,</p>
<code>perl -MDDS -wE 'say Dump "cr-\15, lf-\12, tab-\11, bs-\10";'</code>
947200
947245