
use strict 'vars';
my @lines = <>;
my $randno = int(rand(@lines));
print $lines[$randno];


