Rob Pengelly — Mon, 11 Oct 1999 01:21:00 +0000

Thanks a ton !

----------
[red][Rob P][/red]
[robp@ureach.com]--[[icq]16560402[/icq]]

Mon, 11 Oct 1999 00:29:00 +0000

Code:

#!/usr/bin/perl

$file = "filename.txt";
open (F, $file);
@lines = <F>;
close F;

$random = $lines[rand(@lines)];
print "Content-type: text/html\n\n";
print $random;

----------
Reviews of the best resources for webmasters in your e-mail every week!
Subscribe for [red]FREE[/red] by going to http://www.web-reviews.com/