You can do a while loop and load them into an array..then use the random number generator to randomly select a value from zero to max array index and thus select ONE of them...randomly...

open(FILE,$FILEVARNAME);
While(<FILE>){
  (/^\s*$/) and next;
  chomp $_;
  push(@array,$_);
}
close(<FILE>);
$SIZE=@array;

$select = rand($SIZE);
print @array[$select];
[download]

TexasTess
"Great Spirits Often Encounter Violent Opposition From Mediocre Minds" --Albert Einstein