my ( $bs, $firstname_line_2, $lastname_line_2 ) = split (/,/,$line2);
if ( $lastname eq $lastname_line_2 && $firstname eq $firstname_line_2 ) {
...