print "True","\n" if ( grep /$country/, @countries ); # if present print "False","\n" if (! grep /$country/, @countries ); # if not present