еще вопросик по perl

[Dmitry E. Oboukhov]

программка:

sub next_num
{
  our $num;
  $num++;
  return $num;
}

for ($i=0; $i<10; $i++)
{
  print &next_num, "\n";
}

выведет
1
2
3
4
5
6
7
8
9
10

итп

а как сделать тоже самое но чтобы $num не светилась на глобальном
уровне? есть ли вообще такая возможность в перле?


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]