TEXAS,apple,2,E,0,0000, 0030,     0145,      0030,  0145,   0100,     0030,  0145,     0000,   0000,      3
 NEVADA,GRAPE,2,E,0,0000, 0030,     0145,      0030,  0145,   0100,     0030,  0145,     0000,   0000,      3
 MONTANA,PEAR,2,E,0,0000, 0030,     0145,      0030,  0145,   0100,     0030,  0145,     0000,   0000,      3

##</code><code>##


 $fruit = "apple";
 if ( $_ =~ /$fruit/) {
   print "$_";
    }