d018e6b048164524e7676c01b06be8c751f8bdd4
[openssl.git] / external / perl / transfer / Text / Template.pm
1 #! /usr/bin/perl
2
3 # Quick transfer to the downloaded Text::Template
4
5 BEGIN {
6     use File::Spec::Functions;
7     use File::Basename;
8     use lib catdir(dirname(__FILE__), "..", "..", "Text-Template-1.46", "lib");
9     # Some unpackers on VMS convert periods in directory names to underscores
10     use lib catdir(dirname(__FILE__), "..", "..", "Text-Template-1_46", "lib");
11     use Text::Template;
12     shift @INC;                 # Takes away the effect of use lib
13     shift @INC;                 # Takes away the effect of use lib
14 }
15 1;