my %guy;
$guy{type} = ‘underwater guy’;
$guy->control_sea;
kill $guy, “10 million pounds of
sludge from NY and NJ”;
foreach my $monkey (@monkeys) {
$monkey->gone(heaven);
}
$creature{sky}->suck_into_hole;
$sky->put_in_hole;
$ground = ‘not cold’;
if ($ground ne ‘cold’){
burn $everything;
next $turn;
$mine->too;
}
foreach my $monkey (@monkeys) {
$monkey->gone(heaven);
}
$joe->rock($me);
if ($man == 5) {
if ($man == 5) {
if ($man == 5) {
$devil = 6;
}
$devil = 6;
}
$devil = 6;
$devil = 6;
}
if ($devil == 6) {
$deity = 7;
$deity = 7;
}
foreach my $monkey (@monkeys) {
$monkey->gone(heaven);
}