Help for this page

Select Code to Download

Select or download this
```
@data2 = @{$data1[2]};
```

Select or download this

use v5.14;
use strict;   # redundant!
...
    print "CIRCULAR DATA STRUCTURE in package other\n";
    print \@data2, ' ', $data1[2], "\n\n";
}