in reply to Re^3: how to find differences between two huge files
in thread how to find differences between two huge files

alternately:
($key, $rest_of_rec)=split(/\|/, $file_rec, 2);

[download]
Replace $rest_of_rec with undef if you don't need that value.

Replies are listed 'Best First'.
Re^5: how to find differences between two huge files
by BrowserUk (Patriarch) on Jan 25, 2008 at 01:44 UTC

    Yes. But in some tests I did a while ago (so it may no longer be true), it appeared to me that the second part is produced even if you request it to be discarded. Normally insignificant, but if the records are very large (the OP mentioned 150+ fields) then there seemed no reason to produce what you do not need.

    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.
[reply]

In Section Seekers of Perl Wisdom