in reply to Re^2: combining 2 files with a comon field
in thread combining 2 files with a comon field

Missing semicolon after:

my second

and after

my line = $_

why not just:

(my $first, $second) = split/\|/;