Perl: Fix new test on ancient Perls

package NAME BLOCK is "new" enough to not be ok.
Shame.