1
perl -le'*{$#_}=sub{world},s;"*;$,=$";e,*{$"}=sub{Hello},print$_--->(),&$_'
Refactorings
No refactoring yet !
Marco Valtas
March 19, 2008, March 19, 2008 16:54, permalink
1 rating.
Login to rate!
A simple one, don´t know if is more obscure but certainly fun.
1
perl -e "$_='doHole klrWlg';$_.=$1,print$2while s/(..)(.)//;"
Can you refactor this to make it even more obscure?