hello world

perl -le "''=~('(?{'.('^]).+}'^'./@@_]').'\"'.('@%,,/}*/],^}'^'(@@@@]]@/@:_').',$/})')"