Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...

print "after\n";
pp $newfoo;

Select or download this

before:
[
...
         type    => 7,
       },
}