PROTON-602: Fix syntax errors in Perl.

git-svn-id: https://svn.apache.org/repos/asf/qpid/proton/trunk@1601971 13f79535-47bb-0310-9956-ffa450edef68