Help for this page

Select Code to Download

Select or download this

my @list=split /\n/,do {local $/; <$fh>};

Select or download this
```
my @list=<$fh>;
```