in reply to Re: A (non) reg-ex question
in thread A (non) reg-ex question

Mm, I forgot to test if 
"00001111"=~/^[0]+[1]+$/;

[download]

In Section Seekers of Perl Wisdom