The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Devel::Unplug::OO - OO interface to Devel::Unplug

VERSION

This document describes Devel::Unplug::OO version 0.03

SYNOPSIS

    {
        my $unp = Devel::Unplug::OO->new( 'Some::Module' );
        eval "use Some::Module";
        like $@, qr{Some::Module}, "failed OK";
    }
    eval "use Some::Module";
    ok !$@, "loaded OK";

DESCRIPTION

Devel::Unplug::OO is an object oriented wrapper around Devel::Unplug. It provides a convenient interface for unplugging a set of modules for the life of a particular scope and then automatically inserting them at the end of the scope.

INTERFACE

new( $module ... )

Make a new Devel::Unplug::OO. Any modules named as parameters will be unplugged. When the returned object is destroyed they will be re-inserted.

    # Unplug
    my $u = Devel::Unplug::OO->new( 'Some::Module' );
    
    # Insert
    undef $u;

DEPENDENCIES

Devel::Unplug

INCOMPATIBILITIES

None reported.

BUGS AND LIMITATIONS

No bugs have been reported.

Please report any bugs or feature requests to bug-devel-unplug@rt.cpan.org, or through the web interface at http://rt.cpan.org.

AUTHOR

Andy Armstrong <andy@hexten.net>

LICENCE AND COPYRIGHT

Copyright (c) 2007, Andy Armstrong <andy@hexten.net>.

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.