Re^2: REGEX Non-Destructive Flag

Data::Dump::Streamer can do that:

use Modern::Perl;
use Data::Dump::Streamer;

my $x= "cr-\15, lf-\12, tab-\11, bs-\10";
say Dump $x;
[download]

prints

$VAR1 = "cr-\r, lf-\n, tab-\t, bs-\b";

or as a one-liner,

perl -MDDS -wE 'say Dump "cr-\15, lf-\12, tab-\11, bs-\10";'

Comment on Re^2: REGEX Non-Destructive Flag Select or Download Code

Replies are listed 'Best First'.
Re^3: REGEX Non-Destructive Flag by mmartin (Monk) on Jan 12, 2012 at 16:27 UTC
Hey quester, Thanks for the reply... Yea that did it! Thanks alot. Thanks Again, Matt	[reply]