This works too

            # This works too - but it's certainly not KOSHER!
            {
                package PPI::Statement::Sub;
                local @ISA=('PPI::Document',@ISA);
                $sub->save($option_href->{to}.'/'.$sub->name.'.sub');
                };
[download]

but I'm quite certain that Adam Kennedy and a few others are shaking their heads in anguish!