Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    use strict;
    while ( my $number != 10 ) {
            printf("Please, the number 10: ");
            $number = <STDIN>;
    }
    
  2. or download this
    #!/usr/bin/perl
    use strict;
    ...
            printf("Please, the number 10: ");
            $number = <STDIN>;
    }
    
  3. or download this
    #!/usr/bin/perl
    use strict;
    ...
            printf("Please, the number 10: ");
            $number = <STDIN>;
    }