Help for this page

Select Code to Download

Select or download this
```
my $count= ()= <$fh>;
```
Select or download this
```
my $count= do { 0 while <$fh>; $. };
```