Help for this page

Select Code to Download

Select or download this
```
my $count = keys %{ $testHash{$year} }
```

Select or download this

my $first = 1;
while (...) {
...
    undef $first;
    print "..."; # print the sentence
}