The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more
12345678910111213 use strict;use Test::More;use DateTime;use lib qw( t/lib );eval "use Test::NonUtcSchema";my $err = $@;like( $@, qr/non-UTC/, 'timestamp_source with non-UTC time zone gives error' );done_testing;
use
strict;
Test::More;
DateTime;
lib
qw( t/lib )
;
eval
"use Test::NonUtcSchema"
my
$err
= $@;
like( $@,
qr/non-UTC/
,
'timestamp_source with non-UTC time zone gives error'
);
done_testing;