Select Code to Download

          print "In binary, that is ";
              while ($x < 8) 
...
                      $x++; 
                  }
          die"\n\nProgram ended successfully";