Hi, read the two files names in two different arrays and compare the array using List::Compare module. It will give the presence of extra names in both the files as below.
use strict; use warnings; use List::Compare; my @file1 = qw(name1 name2 name3 name4 name5 name6 name7 name8 name9 n +ame10); my @file2 = qw(name1 name2 name3 name4 name5 name6 name7 name8 name9 n +ame10 name11); my $lcma = List::Compare->new(\@file1, \@file2); print $lcma->get_complement; # extra present in file2 print $lcma->get_unique; # extra present in file1
Regards,
Velusamy R.
In reply to Re: remove entries that match
by Samy_rio
in thread remove entries that match
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |