tie %PLP::Script::get, 'PLP::Tie::Delay', 'PLP::Script::get', sub {
my %get;
my $get;
tie %PLP::Script::get, 'PLP::Tie::Delay', 'PLP::Script::get', sub {
my %get;
my $get;
if ($get ne ''){
for (split /[&;]/, $get) {
my @keyval = split /=/, $_, 2;
if ($get ne ''){
for (split /[&;]/, $get) {
my @keyval = split /=/, $_, 2;