Xavier Noria schreef:
> Detecting whether something holds in an array is the job of grep:
>
> my $numbers = grep /\A$RE{num}{real}\z/, @data;
> next unless $numbers == @data;
Alternative:
die if grep !/\A$RE{num}{real}\z/, @data;
my $numbers = scalar @data;
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
