Help for this page

Select Code to Download

Select or download this

while (@arr2 = <CF>){

foreach $line (@arr2) {

Select or download this

my @arr2 = <CF>;
foreach $line (@arr2) {
# ...

Select or download this
```
while (my $line = <CF>) {
# ...
```