On 9/3/07, Amir E. Aharoni <[EMAIL PROTECTED]> wrote: > What is the best way to count the number of times that a character > appears in a string? > > Currently i do this: > > ---- > my $string = "abracadabra"; > my @matches = ($string =~ /a/g); > print scalar @matches; # 5 > print "@matches"; # a a a a a > ---- > > Is there a way to do it without the intermediate array?
Yes. my $count = () = $string =~ /a/g; -- Gaal Yahas <[EMAIL PROTECTED]> http://gaal.livejournal.com/ _______________________________________________ Perl mailing list [email protected] http://perl.org.il/mailman/listinfo/perl
