#!/usr/bin/perl
use warnings;

my @staff = ( 
             { 
               age      => 21,
               position => 'programmer',
             },

             {  
               age      => 23,
               position => 'administrative assistant',
             },
            );

##</code><code>##

print $staff[1]->{age};

##</code><code>##

my @staff = ( 
             [{ 
               age      => 21,
               position => 'programmer',
             }],

             [{  
               age      => 23,
               position => 'administrative assistant',
             }],
            );