for (1..12){ 
  print "$Cheers[++$flip % 4]\n";
}