Help for this page

Select Code to Download

Select or download this

my @data1 = grep {chomp; length} <$in1>;

Select or download this
```
my @data1 = grep {chomp; $_} <$in1>;
```