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

test_expect(\*DATA, undef, {});
__END__
--test--
[% USE Text::Filter::URI -%]
[% "a b c d" | filter_uri %]
--expect--
a-b-c-d

--test--
[% USE Text::Filter::URI -%]
[% "a text with föreign chäräcters" | filter_uri %]
--expect--
a-text-with-foreign-characters