The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
GRICHTER / Embperl-2.5.0 / test / html / keepreq.htm 

[-

$r = shift ;
$p = $r -> param ;

-]

r before 
global: [+ $Embperl::TEST::r +] 
lokal:  [+ $r +]

p before 
global: [+ $Embperl::TEST::p +] 
lokal:  [+ $p +]

[-

$Embperl::TEST::r = $r ;
$Embperl::TEST::p = $p ;

-]

r after 
global: [+ $Embperl::TEST::r +] 
lokal:  [+ $r +]

p after
global: [+ $Embperl::TEST::p +] 
lokal:  [+ $p +]