in reply to find a specific word

AM,

From the Camel book (3rd edition), page 154: 

my $string = "   \t  DATA    \t   LIST    \t   \n";    ## my initializ
+ation
$string = join(" ", split " ", $string);               ## From book

[download]
Result: "DATA LIST" without CR.

Regards...Ed

"Well done is better than well said." - Benjamin Franklin

In Section Seekers of Perl Wisdom