Beefy Boxes and Bandwidth Generously Provided by pair Networks RobOMonk
Perl Monk, Perl Meditation
 
PerlMonks  

Re^3: Count similar characters in a row

by johngg (Abbot)
on Oct 07, 2010 at 13:50 UTC ( #864000=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    $ perl -Mstrict -wE '
    > open my $fh, q{<}, \ <<EOD or die $!;
    ...
    > say $count;'
    3
    $
    
  2. or download this
    $ perl -Mstrict -wE '
    > open my $rand, q{<}, \ <<EOD or die $!;
    ...
    4 3 3
    4 5 3
    5 5 3
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://864000]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (12)
As of 2014-04-24 09:33 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (565 votes), past polls