On Sat, 19 Nov 2005 00:30:33 +0300
"Dmitry E. Oboukhov" <[EMAIL PROTECTED]> 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 <[EMAIL PROTECTED]> ICQ 3887592


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

Ответить