Help for this page
package CST2; use strict; ... } 1;
#!/usr/bin/perl use strict; ... my @patternList = qw(one two three); my $count = ArrayCount(@patternList); print "$count\n";