my $count = 0;
while (<FILE>){ 
    $count++ if /\Q$src/ && /\Q$sport/;
}
print "Both found a total of $count times\n";