Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
    use strict;
    ...
    print $x . " " for 1..10;
    print "\n\n";
    __END__
    
  2. or download this
    Case: 1 (good)
    0123456789
    ...
    Case: 4 (yikes)
    1 3 5 7 9 11 13 15 17 19 
    1 3 5 7 9 11 13 15 17 19