Skip to content


Subversion checkout URL

You can clone with
Download ZIP
Tree: e51bf5da8a
Fetching contributors…

Cannot retrieve contributors at this time

27 lines (25 sloc) 0.652 kB
use strict;
use warnings;
use lib 'lib';
use Test::More tests => 9;
use Devel::ebug;
my $ebug = Devel::ebug->new;
$ebug->backend("$^X bin/ebug_backend_perl");
is($ebug->line, 6);
is($ebug->eval('$e'), 3);
is_deeply([$ebug->eval('$e')], [3, 0]);
my $exception = $ebug->eval('die 123');
like($exception, qr/^123 at \(eval \d+\)/);
my @exception = $ebug->eval('die 123');
is($exception[1], 1); # no like_deeply
like($exception[0], qr/^123 at \(eval \d+\)/);
is($ebug->eval('$e'), 4);
is($ebug->eval('$e'), 5);
is($ebug->yaml('$e'), "--- 5\n");
Jump to Line
Something went wrong with that request. Please try again.