open(FILE,$license) || die ("Could not open the file\n");
@file=<FILE>;

$find="license @abc";
foreach $line (@file){
   if ($line =~/$find/) {
      print "Found!!!!!!\n";
      print "$line\n";
}
}