foreach my $match (@verifysrclog) 
   {
     if ( $match =~ /Info: Product Line is (\w+)/ ) 
      {
      $product_line = $1; 
      print "$product_line\n";
      }
   }