X-Git-Url: http://git.shiar.nl/perl/plp/.git/blobdiff_plain/3565beca174066a12d2d952d4b24d79a0ca55412..7685d1a41798147fed9cdeb4edee8920b8c39672:/plp.cgi?ds=sidebyside diff --git a/plp.cgi b/plp.cgi index a3c427b..854fe69 100755 --- a/plp.cgi +++ b/plp.cgi @@ -1,22 +1,19 @@ #!/usr/local/bin/perl use v5.6.0; use PLP; +use strict; -die 'Wrong module version' if $PLP::VERSION ne '3.03'; - -use vars qw($DEBUG); +die 'Wrong module version' if $PLP::VERSION ne '3.05'; -use strict; { $PLP::code = ''; $PLP::sentheaders = 0; $PLP::inA = 0; $PLP::inB = 0; + $PLP::DEBUG = 1; delete @ENV{ grep /^PLP_/, keys %ENV }; } -$DEBUG = 1; - PLP::start(); {