The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more

use strict;
BEGIN { require "./t/cookbook/TestCookbook.pm"; }
my $tz = MyTest::Cookbook::TimezoneRecipe04::create('Europe/Minsk');
ok $tz;
is $tz->get_name, 'Europe/Minsk';
my $date = MyTest::Cookbook::DateRecipe04->new;
is $date->get_timezone, undef;
$date->set_timezone($tz);
is $date->get_timezone->get_name, 'Europe/Minsk';
done_testing;