use Data::Dumper;
sub test {
    print Dumper \@_;
}

test(
        "outer"=>(
            "cool"=>1,
            "Kewl"=>2,"odd"
        )
);