http://www.perlmonks.org?node_id=916006


in reply to Attempt to parse a line with odd characters is unsuccessful.

\cI is the tab character and \cM\cJ is the dos newline. So ... splitting on whitespace and taking the third value should work.
my $value = (split( /\s+/, $a1[0] ))[2]
-derby