Help for this page
@data = ( { ... sex => 'Male', } );
use strict; use warnings; ... use Data::Dumper; print Dumper $data2;
$VAR1 = { 'Female' => [ ... ] };