Help for this page

Select Code to Download

Select or download this
```
A=[1,
2,
3,
4
]
```

Select or download this

open(FIL, $file) || die "can't open file $^E\n";
while(chomp($_ = <FIL>) ne "]"){
  #do stuff
}