scalar($array_ref)
Пробуем выполнить scalar($array_ref), где $array_ref - ссылка на массив:
#!/usr/bin/perl -w use strict; $\ = "\n"; $, = ': '; my @array = qw(one two three); my $array_ref = \@array; print 'scalar @$array_ref', scalar @$array_ref; print 'scalar $array_ref', scalar $array_ref;
Получаем:
scalar @$array_ref: 3 scalar $array_ref: ARRAY(0x804db74)
Хотя всё в man prelref написано...
#!/usr/bin/perl -w use strict; $\ = "\n"; $, = ': '; my @array = qw(one two three); my $array_ref = \@array; print 'scalar @$array_ref', scalar @$array_ref; print 'scalar $array_ref', scalar $array_ref;
Получаем:
scalar @$array_ref: 3 scalar $array_ref: ARRAY(0x804db74)
Хотя всё в man prelref написано...