Yeah, that rand @a is cool. One of my favourite uses for it is push @shuffled, splice(@src, rand(@src), 1) while @src; -Bennett ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe