|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexander Kulik 2:4635/8.18 25 Jul 2000 10:35:28
To : Andrey Sapozhnikov
Subject : Длина стринга
--------------------------------------------------------------------------------
24 Июл 00, Andrey Sapozhnikov wrote to All:
AS> ...
>>> Как узнать длину существующего стринга $name?
>>
>> my $len = 0;
>> for( my $i = 0; $i < 256; ++$i ) {
>> my $c = sprintf "\\x%02X", $i;
>> $len += @{[$name =~ /($c)/g]};
>> }
>> можно еще length($name), но этим только чайники пользуются
а чем собственно плох length() ?
Wolf^etc/Scene
--- Roller ball http://sceneteam.da.ru mailto: demoordie@mail.ru
* Origin: Zed is dead baby, Zed is dead... (2:4635/8.18)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
