$true = 1;
 print "eenie\n"  if $true;
 print "meenie\n" if $true;
{print "miney\n"; print "moh\n";} if $true;