you can't insert a code-block within the array-literal, hence keep the semicolon out.
DB<106> @x= map {int rand 10 } 1..10
=> (5, 5, 7, 6, 1, 5, 3, 5, 7, 7)
DB<107> [ sort @x ]
=> [1, 3, 5, 5, 5, 5, 6, 7, 7, 7]
DB<108> [ sort @x; ]
syntax error at (eval 59)[multi_perl5db.pl:644] line 2, at EOF
if you need more than a simple statement use do { BLOCK }.
update
NB: the comment alone is no problem, cause it's ignored while parsing and not part of any statement
lanx@nc10-ubuntu:~$ perl -c
sub my_filter {
my ($hash) = @_;
return [
sort {$b <=> $a} keys %{$hash} #Reverse sort
];
}
- syntax OK
Cheers Rolf
( addicted to the Perl Programming Language)
|