[html-element-library.git] / t / 00system.t

#!/usr/bin/perl
use strict;
use warnings;

use Test::More tests => 1;

diag "Running under perl version $] for $^O",  (chr(65) eq 'A') ? "\n" : " in a non-ASCII world\n";
diag "Win32::BuildNumber ", &Win32::BuildNumber(), "\n" if defined(&Win32::BuildNumber) and defined &Win32::BuildNumber();
diag "MacPerl verison $MacPerl::Version\n" if defined $MacPerl::Version;
diag sprintf "Current time local: %s\n", scalar localtime;
diag sprintf "Current time GMT:   %s\n", scalar gmtime;

pass;
Commit	Line	Data
	1	#!/usr/bin/perl
	2	use strict;
	3	use warnings;
	4
	5	use Test::More tests => 1;
	6
	7	diag "Running under perl version $] for $^O", (chr(65) eq 'A') ? "\n" : " in a non-ASCII world\n";
	8	diag "Win32::BuildNumber ", &Win32::BuildNumber(), "\n" if defined(&Win32::BuildNumber) and defined &Win32::BuildNumber();
	9	diag "MacPerl verison $MacPerl::Version\n" if defined $MacPerl::Version;
	10	diag sprintf "Current time local: %s\n", scalar localtime;
	11	diag sprintf "Current time GMT: %s\n", scalar gmtime;
	12
	13	pass;