X-Git-Url: http://git.shiar.nl/perl/plp/.git/blobdiff_plain/ef6d542255046b6f50d7047d8e5a1d85b9f01042..7685d1a41798147fed9cdeb4edee8920b8c39672:/plp.cgi?ds=inline diff --git a/plp.cgi b/plp.cgi index 850e305..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.02'; - -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(); {