> > perl -le'print map chr((33..126)[rand 93]),0..8' > > perl -le'print map chr((rand 93)+33),0..8' I mean 0..7 and you can shorten it by dropping the l perl -e'print map chr((rand 93)+33),0..7' 41 at my count The clever guy still beats me. ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe