my % phoneDirectory=(
    'Shirley'=> [ '555-0001', '555-0002' ],
    'Michael' => [ ‘555-MIKE' ],
    'Fred' => [ '555-FRED']
);


#access numbers for Shirley
say $_ for @{$hash{'Shirley'}};