Круглые скобки лишние
2010/8/13 Jury Gorky <[email protected]>
> @uni = map { $inc[$_] - $inc[$_ - 1] } (1..$#inc);
>
> 2010/8/13 Andrew Shitov <[email protected]>:
> > Привет!
> >
> > А кто умеет упростить вот это, применив всякие map/grep?
> >
> >
> > my @inc = (0, 10, 20, 35, 55);
> > my @uni;
> > for (my $c = 1; $c != scalar @inc; $c++) {
> > push @uni, $inc[$c] - $inc[$c - 1];
> > }
> > say Dumper \...@uni;
> >
> >
> > --
> > Andrew Shitov
> > ______________________________________________________________________
> > [email protected] | http://shitov.ru
> > --
> > Moscow.pm mailing list
> > [email protected] | http://moscow.pm.org
> >
> --
> Moscow.pm mailing list
> [email protected] | http://moscow.pm.org
>
--
С уважением,
Анатолий Шарифулин.
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
