Enum-Declare-Common

 view release on metacpan or  search on metacpan

lib/Enum/Declare/Common/Timezone.pm  view on Meta::CPAN

	PDT   = "PDT",
	AKST  = "AKST",
	AKDT  = "AKDT",
	HST   = "HST",
	AST   = "AST",
	ADT   = "ADT",
	NST   = "NST",
	NDT   = "NDT",

	# ── Europe ──
	CET   = "CET",
	CEST  = "CEST",
	EET   = "EET",
	EEST  = "EEST",
	WET   = "WET",
	WEST  = "WEST",
	BST   = "BST",
	IST_IE = "IST",
	MSK   = "MSK",
	AZOT  = "AZOT",

lib/Enum/Declare/Common/TimezoneOffset.pm  view on Meta::CPAN

	PDT   = -25200,
	AKST  = -32400,
	AKDT  = -28800,
	HST   = -36000,
	AST   = -14400,
	ADT   = -10800,
	NST   = -12600,
	NDT   =  -9000,

	# ── Europe ──
	CET   =   3600,
	CEST  =   7200,
	EET   =   7200,
	EEST  =  10800,
	WET   =      0,
	WEST  =   3600,
	BST   =   3600,
	IST_IE =  3600,
	MSK   =  10800,
	AZOT  =  -3600,

t/12-timezone.t  view on Meta::CPAN

	is(CST, 'CST', 'CST');
	is(MST, 'MST', 'MST');
	is(PST, 'PST', 'PST');
	is(HST, 'HST', 'HST');
	is(ADT, 'ADT', 'ADT');
	is(NDT, 'NDT', 'NDT');
};

subtest 'european zones' => sub {
	is(GMT,  'GMT',  'GMT');
	is(CET,  'CET',  'CET');
	is(CEST, 'CEST', 'CEST');
	is(EET,  'EET',  'EET');
	is(WET,  'WET',  'WET');
	is(MSK,  'MSK',  'MSK');
	is(AZOT, 'AZOT', 'AZOT');
};

subtest 'south america zones' => sub {
	is(BRT,  'BRT',  'BRT');
	is(BRST, 'BRST', 'BRST');

t/13-timezone-offset.t  view on Meta::CPAN

	is(CST,  -21600, 'CST is -21600 (-6h)');
	is(MST,  -25200, 'MST is -25200 (-7h)');
	is(PST,  -28800, 'PST is -28800 (-8h)');
	is(HST,  -36000, 'HST is -36000 (-10h)');
	is(ADT,  -10800, 'ADT is -10800 (-3h)');
	is(NST,  -12600, 'NST is -12600 (-3:30)');
	is(NDT,   -9000, 'NDT is -9000 (-2:30)');
};

subtest 'european offsets' => sub {
	is(CET,   3600,  'CET is 3600 (+1h)');
	is(CEST,  7200,  'CEST is 7200 (+2h)');
	is(EET,   7200,  'EET is 7200 (+2h)');
	is(BST,   3600,  'BST is 3600 (+1h)');
	is(MSK,  10800,  'MSK is 10800 (+3h)');
	is(AZOT, -3600,  'AZOT is -3600 (-1h)');
};

subtest 'south america offsets' => sub {
	is(BRT,  -10800, 'BRT is -10800 (-3h)');
	is(BRST,  -7200, 'BRST is -7200 (-2h)');