sub printName{ $ref = shift; print "$ref->{name}"; }; printName(\%hs = (name => "vicky"));
Это дает ошибку, есть ли способ пройти?Спасибо
Ваша подпрограмма в порядке, за исключением того, что вы должны объявить $ref.Вы можете просто передать ему анонимный хеш следующим образом:
$ref
printName({ name => "vicky" });