if( $myfruit =~ m[bananas|apples|oranges] ){
   print "I like $myfruit!";
 }
 else {
   print "I don't like $myfruit!";
 }