Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Как из подпрограмы на Perl добраться к массиву, который передан подпрограме как параметр? / 4 сообщений из 4, страница 1 из 1
09.01.2005, 19:24
    #32856918
vano_vvv
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из подпрограмы на Perl добраться к массиву, который передан подпрограме как параметр?
...
Рейтинг: 0 / 0
09.01.2005, 22:09
    #32856993
sky2k
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из подпрограмы на Perl добраться к массиву, который передан подпрограме как параметр?
my $a1 = [1,2,3];
my @a2 = (1,2,3);

aaa($a1, \@a2);

sub aaa {
my ($r1,$r2) = @_;
print($r1->[0]);
print($r2->[1]);
print(@$r2[2]);
}
...
Рейтинг: 0 / 0
10.01.2005, 21:51
    #32858119
vano_vvv
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из подпрограмы на Perl добраться к массиву, который передан подпрограме как параметр?
Можно подробнее о варианте с r2? ну для чего там символ @ присутствует. Еще дополнительная информация - скрипт работает под Apache::Registry на mod_perl, там я знаю не всякое делать можно.
...
Рейтинг: 0 / 0
11.01.2005, 10:37
    #32858488
Green Kakadu
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из подпрограмы на Perl добраться к массиву, который передан подпрограме как параметр?
тебе просто показали разные варианты доступа к массиву, который передан по ссылке
можно так
$r2->[2];
или так @$r2[2];

весь массив:

print @$r2;
авторработает под Apache::Registry на mod_perl
в данном случае это не имеет значения
...
Рейтинг: 0 / 0
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Как из подпрограмы на Perl добраться к массиву, который передан подпрограме как параметр? / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]