# Computed goto, self modifying code, a loop with an unconditional
# jumps, that terminates anyway, uses strict, warnings and POD,
# and fits in a single line less than 80 characters:
perl -Mstrict -we '$_ = "goto F.print chop;\n=dlroW olleH";F1:eval'