Re: Looking for backslashed characters

[thatguy]

in reply to Looking for backslashed characters

String::Escape seems to do what you ask.

print printable( "\tNow is the time\nfor all good folks\n" ); 
\tNow is the time\nfor all good folks\n 

tested code:

#!/usr/bin/perl -w
use String::Escape qw( printable ) ;

open(FILE," text.txt");
while(<FILE>){
   print printable($_);
}
close(FILE);

-p