use strict;
use warnings;

my @words1 = <INPUT1>
my @words2 = <INPUT2>

__END__
syntax error at G:\x.pl line 5, near "my "
Global symbol "@words2" requires explicit package name at G:\x.pl line 5.
Execution of G:\x.pl aborted due to compilation errors.

##</code><code>##

use strict;
use warnings;

open INPUT1, "<", "x.pl";
my @words1 = <INPUT1>;
print "<$_>\n" for @words1;

__END__
<use strict;
>
<use warnings;
>
<
>
<open INPUT1, "<", "x.pl";
>
<my @words1 = <INPUT1>;
>
<print "<$_>\n" for @words1;>

##</code><code>##

my @words1 = map {chomp; $_} <INPUT1>;
my @words2 = map {chomp; $_} <INPUT2>;