![]() |
|< 1 2 >| | ![]() |
12 Einträge, 2 Seiten |
use strict;
Wie frage ich & perlintro
brian's Leitfaden für jedes Perl-Problem(scalar %$hashref) / 2
1
2
3
4
5
6
7
c:\>perl
my %hash = qw/a 1 b 2 c 3 d 4 e 5/;
my $ref = \%hash;
my $anzahl = scalar(@{[%$ref]}) / 2;
print $anzahl, "\n";
^Z
5
![]() |
|< 1 2 >| | ![]() |
12 Einträge, 2 Seiten |