1556 shaares
120 private links
120 private links
The prolific Perl hacker Abigail is famous for posting enigmatic but ingenious one-liner scripts in her signatures on newsgroups.
perl -wle 'print "Prime" if (1 x shift) !~ /^1?$|^(11+?)\1+$/' [number]
