|
Тема |
Re: counting characters in a string [re: DEEM] |
|
Автор |
stinger (свой) |
|
Публикувано | 03.02.03 14:01 |
|
|
Бройкай срещанията за един знак така:
$string = "ThisXlineXhasXsomeXx'sXinXit";
$count = ($string =~ tr/X//);
print "There are $count X characters in the string";
ако търсиш двойки (или повече) числа (23 например) трябва да завъртиш while и да не режеш (без tr):
$string = "-9 55 48 -2 23 -76 4 14 -44";
while ($string =~ /-\d+/g) { $count++ }
print "There are $count negative numbers in the string";
или така:
$count = () = $string =~ /-\d+/g;
воля, воля... и пак воля...
|
| |
|
|
|