Help for this page

Select Code to Download

Select or download this

use warnings;
use strict;
...
  }

print Dumper \@data;

Select or download this

$VAR1 = [
          [
...
            '4'
          ]
        ];