Select Code to Download

use warnings;
use strict;
...
mother female 60 home_engineering
son male 28 musician
daughter female 19 software_engineer

$VAR1 = {
          'son' => [
...
                      ]
        };