Help for this page

Select Code to Download


  1. or download this
    package MyRanger;
    use strict;
    use Carp;
    ...
            print "\tNext item is: $item\n";
        }
    }
    
  2. or download this
    sub size {
        my $self = shift;
        scalar @{$self->{_range}};
    }