Help for this page

Select Code to Download

Select or download this

my @file = <filehandle>;
my $line = join "", @file;
my $results = eval ($line);