package my_package; for my $script (@scripts) { do $script; $vars{$script} = NameSpace::save('my_package'); NameSpace::delete('my_package'); } # additional processing here for my $script (@scripts) { NameSpace::restore('my_package', $vars{$script}); # additional script-specific processing }