Comments on: Counting the occurrences of a substring - the fastest way… http://www.chengfu.net/2005/10/count-occurrences-perl/ Coding for fun Sun, 06 Jul 2008 20:25:11 +0000 http://wordpress.org/?v=2.2 By: chengfu http://www.chengfu.net/2005/10/count-occurrences-perl/#comment-7 chengfu Sat, 26 Nov 2005 17:34:32 +0000 http://www.chengfu.net/2005/10/count-occurrences-perl/#comment-7 Good point, I didn't realize that error. But as far as I can see this would only make the advantage of tr/// bigger, so the overall result at least isn't wrong. Good point, I didn’t realize that error. But as far as I can see this would only make the advantage of tr/// bigger, so the overall result at least isn’t wrong.

]]> By: Mike http://www.chengfu.net/2005/10/count-occurrences-perl/#comment-5 Mike Sat, 26 Nov 2005 01:17:12 +0000 http://www.chengfu.net/2005/10/count-occurrences-perl/#comment-5 The fastest way to count the occurrence of a one character literal substring is using the tr///. Why do you add one to the result when it will then calculate one more than the number of literals found? code: my $string="1-4-7-8-37-5-7-8-3-42"; my $size = $string =~ tr/-//; print "size = $size"; results: size = 9 The fastest way to count the occurrence of a one character literal substring is using the tr///.

Why do you add one to the result when it will then calculate one more than the number of literals found?

code:
my $string=”1-4-7-8-37-5-7-8-3-42″;
my $size = $string =~ tr/-//;
print “size = $size”;

results:
size = 9

]]>