Re: A (non) reg-ex question


Syntactic Confectionery Delight
	PerlMonks

by mickeyn (Priest)

on Mar 20, 2006 at 14:10 UTC ( #537949=note: print w/ replies, xml )

Need Help??

how about:

$str =~ /(0+)(1+)/;       
$is0n1n = length($1)<=>length($2); # 0 if match
[download]

Enjoy,
Mickey

Comment on Re: A (non) reg-ex question Download Code

Node Status^?

node history
Node Type: note [id://537949]
help

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others studying the Monastery: (8)

As of 2013-05-23 01:41 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?