по идее должно напечатать 0, а пишет
не могу использовать undefined value as an ARRAY


вопрос вот в чем, часто использую ссылки для передачи из попрограммы - как то удобно это
А в результате непонятного вот такого поведения ссылки на массив, пришлось, сначала с массивом поработать, а затем через foreach запихать его в ссылку ,
может есть более простой синтаксис??? передачи массива по ссылке?




Спасибо.

# perl -le 'my $ref = []; print scalar @$ref'
0
#

А почему не работает в моем варианте (с круглыми скобками)?
Кто поможет расшифровать? чего я такое написал?

Присваиваете скаляру список. При этом в скаляр ($ref) заносится последний элемент списка. undef в данном случае, т.к список пустой.


Посмотрите что даёт этот код, станет понятно.



Достаточно было

Блин, сколько всего написал уже
Всегда думал 
что 

$ref = ()
это ссылка на безымянный массив. И главное что все всегда работало - этот косяк который обнаружил с undef перый за 5 лет
$ref = {} а если так, то ссылка на безымянный хеш.

а как тогда указать - на что ссылка?
Или как ссылку разименуешь, так perl и будет ее обрабатывать?

За 5 лет можно было бы уже и какую-нибудь умную книжку прочитать.
[] - ссылка на анонимный массив
{} - ссылка на анонимный хеш
() - список
@a - массив
\@a - ссылка на массив
%a - хеш
\%a - ссылка на хеш

Если надо узнать, какая структура данных скрывается за ссылкой, можно воспользоваться функцией ref



Это сообщение отредактировал(а) SkoobyDoo - 4.5.2011, 15:46

Так вроде ж где то и прочитал то ... что $ref = () - я ж не сам такое выдумал. 

Спасибо за ответы, 

но все равно непонятно - чем допустим массив от списка (в perl) отличается - ведь у него массивы то и есть списки
то есть 
$ref = ();
по идее тоже самое что и $ref = []

Код вот ниже вполне рабочий

Список - неизменчивая последовательность
Массив - напротив

Например в perldoc:
map BLOCK LIST
shift ARRAY

Видно, что у map вторым аргументом может быть любая последовательность, а у shift аргументом может быть только массив, т.к. shift изменяет свой аргумент.

Подробнее можно найти в сети. https://www.socialtext.net/perl5/array_vs_list

В вашем примере my $ref_array = () эквивалентно my $ref_array = undef. Уже писал почему.
Затем происходит автооживление: http://en.wikipedia.org/wiki/Autovivification