use Switch;

print "What is your favorite color? ";
chomp($color=<STDIN>);
switch("$color"){
   case "red"  { print "Red!\n"; }
   case "blue" { print "blues.\n"; }
   case "green" { print "green\n";}
   case "yellow" { print "yellow";}
   else          { print "$color is not in our list.\n";}
}
print "Execution continues here....\n";