my @lines = map { chomp; [split] } <SHEET>;

##</code><code>##

my @lines;
chomp, push @lines, [split] for <SHEET>;

##</code><code>##

my @lines = map [split], <$sheet>;

##</code><code>##

my @lines;
push @lines, [split] while <$sheet>;