Select Code to Download

use strict;
use warnings;
my %HoA;
$HoA{'bar'} = 'baz';
@{$HoA{'foo'}} = (1,2,3);
@{$HoA{'bar'}} = (1,2,3);