perl -le '$foo{"bar"} = ["a","b"]; print ref $foo{"bar"}'