aaa.psgi

use Text::MicroTemplate::Extended;
my $mt = Text::MicroTemplate::Extended->new(
    include_path => ['.'],
);

sub {
    $mt->template_args({hoge => 'hoge'});
    my $body = $mt->render('hoge');
    return [200, [], [$body]];
}

catchsegv

Backtrace:
/lib/libSegFault.so[0xb7f97100]
[0xb7f9c400]
/home/chiba/local/perl/lib/perl5/i486-linux-gnu-thread-multi/auto/PadWalker/PadWalker.so(pads_into_hash+0x2b5)[0xb7ca1275]
/home/chiba/local/perl/lib/perl5/i486-linux-gnu-thread-multi/auto/PadWalker/PadWalker.so(padlist_into_hash+0xaa)[0xb7ca137a]
/home/chiba/local/perl/lib/perl5/i486-linux-gnu-thread-multi/auto/PadWalker/PadWalker.so(context_vars+0x6a)[0xb7ca174a]
/home/chiba/local/perl/lib/perl5/i486-linux-gnu-thread-multi/auto/PadWalker/PadWalker.so(do_peek+0xcb)[0xb7ca220b]
/home/chiba/local/perl/lib/perl5/i486-linux-gnu-thread-multi/auto/PadWalker/PadWalker.so(XS_PadWalker_peek_my+0x16b)[0xb7ca281b]
/usr/bin/perl(Perl_pp_entersub+0x552)[0x80b32d2]
/usr/bin/perl(Perl_runops_standard+0x19)[0x80b1879]
/usr/bin/perl(Perl_call_sv+0x135)[0x80aba15]
/usr/bin/perl[0x80939e3]
/usr/bin/perl[0x8095ec8]
/usr/bin/perl(Perl_vdie+0x33)[0x8099313]
/usr/bin/perl(Perl_die+0x25)[0x80993d5]
/usr/bin/perl(Perl_pp_die+0x7b)[0x80fe34b]
/usr/bin/perl(Perl_runops_standard+0x19)[0x80b1879]
/usr/bin/perl(perl_run+0x2e0)[0x80ac6a0]
/usr/bin/perl(main+0xed)[0x8063ddd]
/lib/i686/cmov/libc.so.6(__libc_start_main+0xe5)[0xb7e07455]
/usr/bin/perl[0x8063c51]

hoge.mt

? extends 'moge'

? block content => sub { include('rage') }

moge.mt

? block content => 'default'

rage.mt

?= $undef