It can use strict and warnings without further modification and it's only 70 columns wide, so it fits most places. What do you think?/usr/bin/perl -le'X:for(my$x=1;;){$x%$_||next(X)for(2..$x++);print$x}'
In reply to small sig line by dbw
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |