Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re: Printing the count for regex matches

by Lawliet (Curate)
on Mar 10, 2009 at 01:28 UTC ( #749471=note: print w/replies, xml ) Need Help??


in reply to Printing the count for regex matches

Declare @match before the loop (so that it is not overwritten each time), append any matches to @match, and move the print statement outside the while loop.

And you didn't even know bears could type.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://749471]
help
Chatterbox?
[shmem]: [Discipulus: what do you mean by "dump" ?
[shmem]: Discipulus: what do you mean by "dump" ?
[Discipulus]: get them all printed on screen
Discipulus ;=)
[shmem]: silly question, silly answer:
[Discipulus]: i know, i know..
[shmem]: man perlfunc |perl -nle '$ok++ if /Alphabetical Listing of Perl Functions/;if($ok ){$s{$1}++if /^ (\w+)/}}{for(keys %s){$f="prototype \\\&CORE::$_"; eval"$f"||delete $CORE::{$_}}print for sort keys%CORE::'
[shmem]: well, there are some builtins which don't have a prototype...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (9)
As of 2017-05-23 10:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?