The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use Wiki::Toolkit::Formatter::UseMod;
use Test::More tests => 2;

my $wikitext = <<WIKITEXT;

http://external.example.com/

[http://external2.example.com foo]

WIKITEXT

my $formatter = Wiki::Toolkit::Formatter::UseMod->new;

my $html = $formatter->format( $wikitext );

like( $html,
      qr'<a href="http://external.example.com/">http://external.example.com/</a>',
      "external links with no title appear as expected" );

like( $html,
      qr'\[<a href="http://external2.example.com">foo</a>\]',
      "external links with title appear as expected" );