in reply to File comparison

C:\>perl -anF/,/ -e "print qq($F[0]\n)" file1.txt>c:\file1a.txt
C:\>type 1a.txt
a
b
d
c
e
C:\>perl -anF/,/ -e "print qq($F[0]\n)" file2.txt>file2a.txt
C:\>type 2a.txt
a
b
c
d
c
e
C:\>diff file1a.txt file2a.txt
4d3
<c

[download]


holli, /regexed monk/

Replies are listed 'Best First'.
Re^2: File comparison
by tilly (Archbishop) on Nov 01, 2005 at 16:32 UTC
    What if one field somewhere has an internal line break?
[reply]
      Then the data is corrupt ;)


      holli, /regexed monk/
[reply]
[d/l]
        Common tools like Excel, DBD::CSV, and Text::xSV disagree with that prognosis.
[reply]
      it won't have one. Before these two files are created, all data is verified, any linebreaks, spaces are removed.
[reply]

In Section Seekers of Perl Wisdom