$VISITOR = int rand 100_000; { next if $VISITOR =~ s/1\d$/$&th/; # 10-19 next if $VISITOR =~ s/1$/1st/; # 1 next if $VISITOR =~ s/2$/2nd/; # 2 next if $VISITOR =~ s/3$/3rd/; # 3 next if $VISITOR =~ s/\d$/$&th/; # everything else }
-- Randal L. Schwartz, Perl hacker
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |