in reply to Creating Tag Clouds from a Database

If you insert a line

on the line before the line perl complains about, and then try to move it (the __END__ line) up one line at a time until perl stops complaining, then down one line again, you have found the first offending line.

The line

my @sortkeys = sort {$tags->{count}<=> $tags->{$a}->{$count}} keys %{$ +mytags::tags};
has several problems, but I guess you can see them now?