Help for this page
package DataDecoder; use Moose; ... } 1;
#!/usr/bin/env perl ... use Data::Dumper; print Dumper @array; exit;