Quick Search:
 Perl Code: Count words or terms Jump to:  
Category: >> Perl Code >> Count words or terms  

<< lastnext >>

Snippet Name: Count words or terms

Description: Count the number of times a given word or character appears in a string.

Comment: (none)

Language: PERL
Highlight Mode: PERL
Last Modified: March 05th, 2009

# count negative numbers
WHILE ($string =~ /-\d+/g) { $count++ }
PRINT "There are $count negative numbers in the string";
# count asterisks:
$count = ($sentence =~ TR/*/*/);
# count the number of lines containing the word "Sally";
$totalSallys++ IF ($line =~ /sally/i)

   Home |    Search |    Code Library |    Sponsors |    Privacy |    Terms of Use |    Contact Us © 2003 - 2024 psoug.org