Select Code to Download

my $filename = "test.pl";
my $size = -s $filename;
unless ($size) {
    die "error getting file size [$filename]: [$!]";
}