require
5;
BEGIN { plan
tests
=> 1; }
print
"#\n#\n"
,
"# Module::Versions::Report v$Module::Versions::Report::VERSION\n"
,
"#\n#\n"
,
;
print
"# Running under perl version $] for $^O"
,
(
chr
(65) eq
'A'
) ?
"\n"
:
" in a non-ASCII world\n"
;
print
"# Win32::BuildNumber "
,
&Win32::BuildNumber
(),
"\n"
if
defined
(
&Win32::BuildNumber
) and
defined
&Win32::BuildNumber
();
print
"# MacPerl verison $MacPerl::Version\n"
if
defined
$MacPerl::Version
;
printf
"# Current time local: %s\n# Current time GMT: %s\n"
,
scalar
(
gmtime
($^T)),
scalar
(
localtime
($^T));
print
"# Using Test.pm v"
,
$Test::VERSION
||
"?"
,
"\n"
;
ok 1;