Perl ogd - ordered global destruction