Select Code to Download

use strict;
use warnings;
...
        }
    }
}

C:/Perl_524/bin\perl.exe -w d:/tmp/pm/bitstrings.pl 
11100 0 1 2
...

Compilation finished at Fri Sep 18 10:43:25