print"perlmonks rule!\n";$}++^9&&do$0
# update: alternative version
print"perlmonks rule!\n";$-++-9&&do$0
# update: not crazy, but shorter
eval'print"perlmonks rule!\n";'x10
# update: inspired by brx
s//perlmonks rule!\n/;s/[print ten times!]/print/eg
[download]