Select Code to Download

use warnings;
use strict;

Unquoted string "test" may clash with future reserved word

#!/usr/bin/env perl
use warnings;
...
    print;
}
close $test_fh;