Код

my %hash=('a'=>'b'); &share(%hash); sub share:    {    ...;    }

Как в подпрограмме share найти value(b) хэша, передаваемого этой подпрограмме, зная ключ к этому значению(a)?
Как я понял, подпрограмме передаётся список - "@_", то есть ключ и значение хэша становятся ячейками списка, никак между собой не связанными.
И на всякий случай, скажу для какой цели это нужно:
Подпрограмме передаётся хэш с параметрами, скажем, отображения HTML страницы, где любой ключ - название параметра, а соответствующее значение - значение параметра. Я пробовал передавать значения параметров списком, или скалярами, но они должны идти в определённом порядке,... утомительно.

Что-то похожее я видел в CGI.pm:

Код

use CGI; $query=new CGI; print $query->header(-encoding=>'KOI8-R');

функции header тоже передаётся соответсвие ключ=>ячейка, но не хочется лезть в исходники .

Есть у кого-нибудь решение моей проблемы? [s]

Это можно сделать так:
1. Неявной передачей ссылки (использование прототипов):

Код

sub f(\%) {   my $a=$_[0]->{'key'}; } f(%a);

2. Передачей хэша как массива с четным числом элементов:

Код

sub f {     my $a={@_}->{'key'}; } f(%a);

Другая запись использования ссылки:

Код

sub func {  my $ref=$_[0];  my %hash=%$ref; } my %hash=('a'=>1,'b'=>2); &func(\%hash);

Э.... а почему не подходит такой способ?

Код

&func(%data); sub func{ my %_data=@_; }

everyone
Я обычно передачу делаю вот так:

Код

my %hash=('a'=>'b'); &share(\%hash); sub share {    my $hash = shift;    print $hash->{'a'}; }

Если передаётся один хеш, то можно получить его и без ссылок простым присваиванием:
Например:

Код

#!/usr/bin/perl -w use strict; my %a = ( key1 => "val1",          key2 => "val2",          key3 => "val3" ); sub CheckVal2 {    my %temp = @_;    print $temp{ key2 }, "\n"; } # Теперь передадим его в подпрограмму # и получим значение val2 из него. CheckVal2( %a );

Насчёт списка ты прав, хеш действительно сохраняется в массив в виде линейного списка, но он не смешивает ключи и значения. Другими словами, список будет примерно таким:
("key2", "val2", "key3", "val3", "key1", "val1")
Здесь стоит обратить внимание на то, что в списке каждое значение стоит справа от своего ключа. Но сами пары расположены не по порядку, но в тоже время это не имеет никакого значения. Вобщем мы получаем точную копию хеша, причём если хеш объявлен как локальный, как в примере выше, то его можно назвать таким же именем как и передавемый подпрограмме.
Проблема возникает только в том случае, если ты передаёшь в подрограмму не один хеш.

Удачи.
Добавлено @ 22:21
dimes - опс.... Извини, просто сначала не заметил того, что ты это уже написал . ;)))))))))

Это сообщение отредактировал(а) korob2001 - 27.1.2005, 22:23