Greenguy's Board - View Single Post - Would any body know of a PERL equivalent to this PHP code?

cd34 · 2005-08-18, 02:34 PM

Code:

#!/usr/bin/perl

open WL,"wordlist";
chomp(my @words = <WL> );
close WL;

print $words[rand(@words)];

something like that.

2005-08-18, 02:34 PM	#3
cd34 a.k.a. Sparky Join Date: Sep 2004 Location: West Palm Beach, FL, USA Posts: 2,396	Code: #!/usr/bin/perl open WL,"wordlist"; chomp(my @words = <WL> ); close WL; print $words[rand(@words)]; something like that. __________________ SnapReplay.com a different way to share photos - iPhone & Android