Help for this page

Select Code to Download

Select or download this
```
my (%count);
```

Select or download this

undef $/;

...
    $count{'vow'}++ if(/[aeiou]/);
    $count{'sen'}++ if(/\./);
  }