The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use Test::More tests => 3;
use MozRepl;

my $repl = MozRepl->new;

SKIP: {
    eval { $repl->setup( { plugins => { plugins => [qw/Repl::Enter/] } } ); };

    skip( "MozRepl is not started or MozLab is not installed." . $@, 3 ) if ($@);

    ok( $repl->can('repl_enter') );
    is( $repl->repl_enter( { source => 'window' } ),
        '[object ChromeWindow]' );
    is( $repl->repl_enter( { source => 'document' } ),
        '[object XULDocument]' );
}