So as a regex would be:
/^(([01])([01]*\2)?\z/ [download]
-- Randal L. Schwartz, Perl hacker
In reply to RE: Fun Regex Exercise by merlyn in thread Fun Regex Exercise by japhy