On Sat, 19 Nov 2005 00:30:33 +0300
"Dmitry E. Oboukhov" <dimka@avanto.org> wrote:
{
my $num;
DEO> sub next_num
DEO> {
DEO> $num++;
DEO> return $num;
DEO> }
}
DEO> for ($i=0; $i<10; $i++)
DEO> {
DEO> print &next_num, "\n";
DEO> }
--
Alex Kicelew <arkoort@gmail.com> ICQ 3887592