Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

columns

by smokemachine (Hermit)
on Nov 14, 2006 at 19:53 UTC ( [id://584044] : obfuscated . print w/replies, xml ) Need Help??

$_="2qw e3qwe\z x74sdfsx cx23 5w er0sd3f dasasd4f asd6sada sdf75as d3asd1a sd2zxcv6 2 48sdf3 asdfasd f4asdfs dfasdfas df68 1sd f0xcvbx cvb3xcv xcb2ykhk hjk1ghjk ghjktyd fgzfhnc hb9 1sdf sdf0sdsd fdf9dfg fghr7df gesdfsf1 fgdrgghg fhdsef1 6lnn0as dasfsd6s dfs25dsf sefdgcf gd0 55 asddsasd 2sdfsada s1da5da dqweq6 5fsdfwef lsdj4sdl kfj sdf lkjkjh3 kllnfds6 mfkgjfl6 fdfgdf g2 5uih 0sdfsdfe wer3eef fgdf rw ewfew2d fsdfgs5d ihfsdf s dfsdf s df4 4fs dihfssrg 9rdvxvse fs sdfj ewfh2sh dfb4dfsd 5rsidofj wefsjš 2 6gerg hsd sf s dvh dlvs av sdfe wefewfw 2ewd afj sebf dsh g cdfgf fewkh f 2 ff efh wl3bfsd kjf 5 s sdfh fs d fh sn2 1fflask djfh as ei u bd g g1ui h3iu sdg a u2ha asd12 4 dafseh d h d0d fs dfasd d 6dfsdf sdf 8fdf safda 4d fs dsds 0 5sdfw f sdgfd sgdfg0 q w erwex 2h sdg av2 5h z \c\assd fs1 5sd ewdas a sd 5tdfr gh 32hj sd 5td dsf asd f asd9 5 rfsdhf a sdf4esd b cefds fdsf sd9 dsfsd fa sdf0sdf 5r fvsd f b kjh4 1r eb g 3sa dd asd 1 l k 1kb h 1eawdqwe a eu jb jhasdas 9 52 asd fh as df 3dhfd eq yg 3 askdh 5t uh bfsad f2 3as wdh k2j h asdbas dlhakasj hdfsekd asd wdh asbj9hd sf sdfas 7ufgs w sgd qh 1jgsadas db4 1ars fh sdfa s1991 q wer qwas df ragf1 5sdh s afsdf a sdf0sdfa sd fasdk f 1i sd adfASDF d4dsf as df 5sfh sadfseA uh kj n 7 5dsfja gagafd0 gadfglš kjaslfš h0rgfad sg 1h h hdflkas dhasd s sadh ash d5shd fs djkhf l adfjsdh 1 5ufhds 4lsdh d saf16sd 6sdfh a rsasgadf gf0 0qwd wehgf s wef dsh f9sdf ya sdg 0esf akdsfga ff 3dz xgcsdas1 suaid as dasf1"; s~([^\W _a-zA-Z] ).*?(\d) .*?( \d ).*?(\d ).*?(\d) .*? (\d) .*? \s* ~chr((( $1.$2)+( $5.$6)>( $3.$4)) ?(($1.$ 2) + ($5 .$6)):( $3.$4)) ~emsgx; ;;;;;;;; ;;;;;;;; ;;print