ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Dmitriy Goldobin 2:5020/400 24 Jul 2000 02:51:42
To : All
Subject : Re: Длина стринга
--------------------------------------------------------------------------------
> Как узнать длину существующего стринга $name?
my $len = 0;
for( my $i = 0; $i < 256; ++$i ) {
my $c = sprintf "\\x%02X", $i;
$len += @{[$name =~ /($c)/g]};
}
можно еще length($name), но этим только чайники пользуются
--- ifmail v.2.15dev5
* Origin: Electronic Microsystems JSC (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: Длина стринга 
