Plperl trigger variables no longer global

This works in 9.0 but not in git/9.1 beta:

CREATE FUNCTION wheredidmytdgo()
RETURNS TRIGGER
LANGUAGE plperlu
AS
$bc$
use strict; use warnings;
my $new = $_TD->{new};
return;
$bc$;

The error is:

ERROR: Global symbol "$_TD" requires explicit package name at line 3.
CONTEXT: compilation of PL/Perl function "wheredidmytdgo"

--
Greg Sabino Mullane greg(at)endpoint(dot)com
End Point Corporation
PGP Key: 0x14964AC8