my @countries = (
   "India",
   "America",
   "Germany",
   "Austria",
);

for (@countries) {
   if ($_ eq $country) {
      print "True";
      last;
   }
}