Select Code to Download

my $line;
my @lines;

#!/opt/perl5/bin/perl -w

...
       print;                 
}

Global symbol "$line" requires explicit package name at day1_test.1.pl
+ line 8.
Value of <HANDLE> construct can be "0"; test with defined() at day1_te
+st.1.pl line 8.
Execution of day1_test.1.pl aborted due to compilation errors.