Thread
:
Perl
View Single Post
05-28-2003, 07:20 PM
Hydra42
Registered User
Join Date: May 2003
Posts: 1
Perl
perl -e 'for($i=0;$i<2^64;$i++) { $s1 = reverse(split(//, sprintf("%s", $i))); $s2 = sprintf("%.0f", $i*4); printf("%.0f\n", $i) if($s1 hahahaha $s2); }'
Hydra42
View Public Profile
Find More Posts by Hydra42