oops, My effort went in vain :(
use strict;
use warnings;
use English '-no_match_vars';
local($INPUT_RECORD_SEPARATOR) = "\r\n";
open my $fh, "./MyTsv.txt" or die $!;
while(<$fh>) { print;}
prints this:
define HOSTNAME indpdsol3
define DBPATH /ccmdb/basedb
TestCaseID Prefix Command Postfix Wait MatchString MatchOnly
LineCount StatusCode
TC001 cd ~/ ccm start cd ~/ccm_wa 0 "This
this
and
this" 1 4 0
_LINE_BREAK_MARKER_
When I open the same file in a editor I see CRLF like this:
define HOSTNAME indpdsol3 <CRLF>
define DBPATH /ccmdb/basedb <CRLF>
<CRLF>
TestCaseID Prefix Command Postfix Wait MatchString MatchOnly
LineCount StatusCode<CRLF>
TC001 cd ~/ ccm start cd ~/ccm_wa 0 "This<LF>
this<LF>
and<LF>
this" 1 4 0<CRLF>
|