[Moscow.pm] А как написать свой sort?

[Ivan Petrov]

> Аа извините, непонятно было ... вы это имели в виду ?

> sub mysort(&@)
> {
> my ($cb, на args) = @_;
> local $a = 1;
> local $b = 2;
> $cb-> ();
> }

это к сожалению тоже неработоспособный вариант. кроме warning о
применении $a/$b, еще и неопределенные значения $a и $b.

caller нужно применять. и каким-то образом отключить warning стадии
компиляции. но отключить так чтобы не заставлять юзера это делать