Help for this page

Select Code to Download

Select or download this
```
use strict;

...
123
456
789
```

Select or download this

my @atoms = ([qw(123 231 312)], [qw(456 564 646)], [qw(789 897 978)]);
open(my $fh, ">", "somefile.txt") or die("ack - $!");
...
123 231 312
456 564 646
789 897 978