c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"my $s = qq{abc defg hi  \t  \n};
 my $t = unpack 'A*', $s;
 dd $t;
"
"abc defg hi"