File: counttest.kbs

package info (click to toggle)
basic256 0.9.6.69a-1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 26,304 kB
  • sloc: cpp: 7,778; yacc: 926; lex: 575; sh: 21; makefile: 7
file content (12 lines) | stat: -rw-r--r-- 403 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
 
# counttest.jbs 2011-01-05 j.m.reneau
# for version 0.9.6.56

a$ = "We all live in a yellow submarine, yellow submarine, yellow, submarine."

print a$
print "count of w = " + count(a$,"w")
print "count of W = " + count(a$,"W")
print "count of YeLlOw (ignore case) = " + count(a$,"YeLlOw",true)
print "count of W (ignore case) = " + count(a$,"W",true)
print "count of regex [Ww] = " + countx(a$,"[Ww]")