Help for this page

Select Code to Download

Select or download this
```
say scalar grep{ $_->[2] } @select;
```

Select or download this

my $length;

$length++ if $_->[2] for @select;
say $length;