lobal symbol "$line" requires explicit package name at noname.pl line 5.
Global symbol "$element" requires explicit package name at noname.pl line 6.
...

##</code><code>##

use strict;
use warnings;

my $fname = 'list.txt';

open my $fOut, '>', $fname or die "Can't create $fname: $!\n";
print $fOut <<TESTDATA;
some test data goes here
TESTDATA
close $fOut;

...