Select Code to Download

package MyGMTime;
# MUST be ordered correctly:
...
my $x = MyGMTime->new;
print $x->get("year"), "\n";   # mnemonic/hashly
print $$x[5], "\n";            # arrayish

### use this instead of the 'use enum' statement:
my %index = (
...
    return $self->[$index{$field}];
}