while(){foo} # 12 chars foo while 1 # 11 chars [download]
In reply to Re^2: Solutions by xmath in thread How's your Perl? by xmath