Looks like a cut-n-paste error :-)
In the four places that you have:
my $cat = (<DATA>);
Change it to:
$cats = (<DATA>);
Regards,
PN5
In reply to Re: not well-formed (invalid token)
by Prior Nacre V
in thread not well-formed (invalid token)
by Maxim
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |