Help for this page
@keys=qw'79 11 34 69 41 27'; @list_to_crypt = split/ /, 'writing Library. Building consider TO($FOO +) *binary*' ; @result=map{ crypt ($_.' ', shift @keys) } @list_to_crypt ;
79jUStLZ6Ck9c 11anOTHZ33A12 ... 69pERLsGUZYU2 41HAcKS9/lrEQ 27eRTYtC6a5HI
@matcher = qw'2 4 4 2 5 4' ; foreach $crypted (@result ) { ... $crypted =~/..(.{$x}).*/g ; push @final, $1 ; }
jUSt anOTH ... pERL HAcK eR
www.com | www.net | www.org
No recent polls found