$line = "API##";
if($line =~ m/"API#"/) {
      print "Match found\n";
}
else { 
      print "Match not found\n";
}