Select Code to Download

#!c:\Perl\bin\perl
use warnings;
...
    }
    print "\n";
}

Outer1
O1Inne1 = 32   O1Inne2 = 64   O1Inne3 = 128   O1Inne4 = 256   
...
O4Inne1 = 4096   O4Inne2 = 8192   O4Inne3 = 16384   O4Inne4 = 32768   
+O4Inne5 = 65536   
Outer5
O5Inne1 = 131072