Help for this page
Box of Joe CA12DE 12345
chomp(my @file2 = <F2>); while (<F1>) { print unless @file2 ~~ (split /\t/)[1]; }