1
2require 5;
3use Test;
4BEGIN { plan tests => 1; }
5use Locale::Maketext 1.01;
6
7print "#\n#\n",
8 "# Locale::Maketext v$Locale::Maketext::VERSION\n",
9 "# I18N::LangTags v", $I18N::LangTags::VERSION || "?", "\n",
10 "#\n#\n",
11;
12
13print "# Running under perl version $] for $^O",
14      (chr(65) eq 'A') ? "\n" : " in a non-ASCII world\n";
15
16print "# Win32::BuildNumber ", &Win32::BuildNumber(), "\n"
17 if defined(&Win32::BuildNumber) and defined &Win32::BuildNumber();
18
19print "# MacPerl verison $MacPerl::Version\n"
20 if defined $MacPerl::Version;
21
22printf
23 "# Current time local: %s\n# Current time GMT:   %s\n",
24 scalar(   gmtime($^T)), scalar(localtime($^T));
25
26print "# Using Test.pm v", $Test::VERSION || "?", "\n";
27
28ok 1;
29
30