in reply to Fetching 3 letters only

Actually, you don't need a regular expression for this... use tr instead.
my $count = "fileCapaber" =~ tr/AaBbCc//; print "Count is $count\n";

-- Mike

--
just,my${.02}