my $itaintbroke;
dontfixit if ($itaintbroke);
sub dontfixit {
}

print "I like chicken.\n";