$flip = ++$flip % 4

##</code><code>##

$flip = ($flip + 1) % 4

##</code><code>##

($flip += 1) %= 4

##</code><code>##

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