Help for this page

Select Code to Download


  1. or download this
     package main;
     use strict;
    ...
     my $doit = doit->new();
     my @data = 1..10;
     print $doit->enumerate( \@data );
    
  2. or download this
    package main; 
    use strict; 
    ...
    isa_ok my $doit = doit->new(), 'doit';
    my @data = 1..10; 
    is_deeply [$doit->enumerate( \@data )], [1..10], 'enumerate works';