use strict;
use warnings;
use Test::More tests => 1;
use t::lib::capture;

@CAPTURE_OPTS = ('-MDevel::Confess');

unlike capture <<"END_CODE", qr/Assertion failed/, "die in END";
sub error {
#line 1 test-block.pl
  die "error in something";
}
END { error() }
END_CODE