Manip::END 0.08

Manip::END is a Perl module that can mess around with END blocks.

SYNOPSIS

use Manip::END qw( clear_end_array set_end_array );

clear_end_array();

set_end_array(sub {...}, sub {...});

$ends = Manip::END->new;

$ends->unshift(sub {...}, sub {...});

$ends->remove_class("My::Class");

$ends->remove_isa("My::Base::Class");

$ends->remove_pat("^My::Modules");

$ends->filter_sub(&thing_about_it));

HOW TO USE IT

The most useful thing you can do with it is to remove certain END blocks based on the package they belong to. You can do something like

my $ends = Manip::END->new;

$ends->filter_sub(&think_hard_about);

Where think_hard_about is a function that takes in a package name and returns a true or false value depending on whether you want to keep or remove the END blocks in that package.

There are prebuilt convenience methods for removing the END blocks for a specific package, all packages matching a pattern or all packages inheriting from a certain package.

Product's homepage

Requirements:

· Perl