http://www.perlmonks.org?node_id=200069

My second obfu, so don't be to harsh, please...
# # _this_ is the answer to life the universe and everything # use strict; $/=""; for(split(//,<DATA>)){($a)=$_=~/([\w\d\s])/ ; $@.=$a;}$@=~s/[\s\n]+//gim;$@=~s/tf/t\'f/;$@.="\n'"; eval ($@); __DATA__ () ()*$@ (*&))& )&)()&}{@ }{%}% }#{ %!}%{ !!) (p)(# $)& ! #$*!( ))!% ! #}#!$ {}{ !$!#$%r)(%@%@%{{@#!%@#%@{{~@# !@#in)&!)(&#%@%$%@{}{!|}{|{|}{? !//,./.,?><?,/.,t f@#%&)(&)&)&)!@ ! >??#< ! ?(*^# $^#> [;\\!;' ' .'][;[]#] -o )*&)^ )@# $% )&^&^ *&* $ &^r^$ #t@% !) !@#$! !(@$& <y ?><"@ {t{}! (* {}!%# *$&#@' @&$ )$@^+ }{\\.]/, )+\]$} *$*!! )(^w!#%][\{{;\<>/ *&)[;\ *^!#%[\,.'o$@^ [] @%)!@!#$% #


er formait hyarya.
-- "Life is a house and the next tornado is never far away"
-- "lovely by nature"