mirror of https://github.com/openssl/openssl
27 lines
566 B
Perl
Executable File
27 lines
566 B
Perl
Executable File
#!perl
|
|
#
|
|
# Test for breakage of Dist::Milla in v1.46
|
|
#
|
|
|
|
use strict;
|
|
use warnings;
|
|
use Text::Template;
|
|
|
|
BEGIN {
|
|
# Minimum Test::More version; 0.94+ is required for `done_testing`
|
|
unless (eval { require Test::More; "$Test::More::VERSION" >= 0.94; }) {
|
|
Test::More::plan(skip_all => '[ Test::More v0.94+ ] is required for testing');
|
|
}
|
|
|
|
Test::More->import;
|
|
}
|
|
|
|
my $tmpl = Text::Template->new(
|
|
TYPE => 'STRING',
|
|
SOURCE => q| {{ '{{$NEXT}}' }} |,
|
|
DELIMITERS => [ '{{', '}}' ]);
|
|
|
|
is $tmpl->fill_in, ' {{$NEXT}} ';
|
|
|
|
done_testing;
|