How do you access individual keys and values of a hash of array

%attributes = (
    'OS_List' =>  [ 'Linux', 'Windows', 'MAC' ],
    'Script_List' => [ 'Perl', 'Python', 'Ruby' ],
);

print join (",", @{$attributes{'OS_List'}}) . "\n";

print @{$attributes{'OS_List'}}[1] . "\n"; #Output : Windows