Log Message:
-----------
Fix bug found by warning from recent gcc. patch from Tim Bunce.
Modified Files:
--------------
pgsql/src/pl/plperl:
plperl.c (r1.161 -> r1.162)
(http://anoncvs.postgresql.org/cvsweb.cgi/pgsql/src/pl/plperl/plperl.c?r1=1.161&r2=1.162)