Само собой))
perl -e ' sub add { my ($a) = @_; return sub { $a + $_[0] }; } my $add5 = add(5); print $add5->(1); '
кто-то не читал базовые маны по языку
А ты видел сколько их там? Пока прочтёшь - поседеешь, а прогу написать нужно к четвергу. ;)
базовых не так много
Обсуждают сегодня