|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : InSAn \(Panchuk Andrey\) 2:5020/400 31 Aug 2002 22:28:55
To : Igor Bychkov
Subject : Re: стpока слyчайных символов
--------------------------------------------------------------------------------
Hello, Igor!
You wrote to All on Fri, 30 Aug 2002 23:19:28 +0400:
IB> как сгенеpиpовать стpокy слyчайный симоволов? желательно чтобы можно
IB> было задать из каких символов и какой длины.
my @chars = ("a".."f",0..9);
# массив нужных символов
my $srt = join("", @chars[map {rand @chars} (1..N)]); # генерация строки
длинной N симв.
With best regards, InSAn.
http://www.PROext.com
--- ifmail v.2.15dev5
* Origin: PROext (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
