ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Konstantin Tokar                     2:5020/400     26 Jun 2002  21:21:40
 To : Nikolay Pichtin
 Subject : Re: strict ругается
 -------------------------------------------------------------------------------- 
 

 >  Генерирую случайное слово следующим скриптом:
 >  Если use strict разремарю, то он ругается на @Nn = (A..Z,a..z)
 >  Почему?
 > 
 > #use strict;
 > #use vars qw (@Nn);
 
 А такой хак не поможет?
 use vars qw (@Nn);
 
 или my @Nn;
 > 
 > my (%Nn,$crc,$i);
 > @Nn = (A..Z,a..z);
 > foreach my $m (@Nn) {
 >  $Nn{rand(time)} = $m;
 > }
 
 --- ifmail v.2.15dev5
  * Origin: Demos online service (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    strict ругается   Nikolay Pichtin   26 Jun 2002 20:30:52   Re: strict ругается   Konstantin Tokar   26 Jun 2002 21:21:40   Re: strict ругается   InSAn \\(Panchuk Andrey\\)   26 Jun 2002 22:59:38   Re: strict ругается   Dmitry Koteroff   27 Jun 2002 01:02:19   Re: strict ругается   Nikolay Pichtin   27 Jun 2002 01:21:55   Re: strict ругается   Artem Chuprina   27 Jun 2002 09:47:11