Help for this page
my $reportfile = '/home/user/data.txt'; open my $reports, "<", $reportfile ... }; print $filehandle{$type} $_; };