Help for this page

Select Code to Download

Select or download this

for (@resultarray) { s/^0$/1/ };

...
            push(@output5b, $outputb);
           
           for(@output5b){s/0/1/g}; #convert output from 0 to 1