Help for this page

Select Code to Download


  1. or download this
    
        sub make_fruit_counter {
    ...
        print $apple->(5)."\n";
        print $orange->(1)."\n";
    
  2. or download this
    
        1 apple
    ...
        9 apples
        2 oranges
    
  3. or download this
        #!/usr/bin/perl
    
    ...
        $book->close 
            or die "Couldn't close spreadsheet : $!";
    
  4. or download this
    
        #!/usr/bin/perl
    ...
    
        }
    
  5. or download this
    
        #!/usr/bin/perl
    ...
        $book->close
            or die "Couldn't close spreadsheet : $!";