The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;
use t::TestTextTrac;

run_tests;

__DATA__

### regression test 1
--- input
[http://shibuya.pm.org/blosxom/techtalks/200610.html Shibuya.pm ¥Æ¥¯¥Ë¥«¥ë¥È¡¼¥¯ #7]
--- expected
<p>
<a class="ext-link" href="http://shibuya.pm.org/blosxom/techtalks/200610.html"><span class="icon"></span>Shibuya.pm ¥Æ¥¯¥Ë¥«¥ë¥È¡¼¥¯ #7</a>
</p>