Help for this page
use strict; my $data = [ '10010' ]; print @{ $data->[0][1] };
use Data::Dumper; print Dumper($data); print Dumper($data->[0]);