[Date Prev][Date Next][Thread Prev][Thread Next]
[Search]
[Date Index]
[Thread Index]
[FWP] $_=$l[rand@l];
- To: fwp@technofile.org (Fun With Perl List)
- Subject: [FWP] $_=$l[rand@l];
- From: kpreid@ibm.net (Kevin Reid)
- Date: Wed, 28 Jul 1999 08:56:18 -0400
- Organization: Reid & Hoffman
Something to try shortening:
@ARGV='iMax:Documents:Info:lwall-quotes.txt';$/='%%
';@l=<>;$_=$l[rand@l];chomp;print
(The line IS supposed to be split at the %%. And of course, changing the
pathname doesn't count.)
--
Kevin Reid: | Macintosh:
"I'm me." | Think different.
==== Want to unsubscribe from Fun With Perl? Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
==== unsubscribe