diff --git a/t/rt_25924_user_defined_func_unicode.t b/t/rt_25924_user_defined_func_unicode.t index 7635edf..5a1d4c9 100644 --- a/t/rt_25924_user_defined_func_unicode.t +++ b/t/rt_25924_user_defined_func_unicode.t @@ -15,7 +15,8 @@ BEGIN { plan( skip_all => 'Unicode is not supported before 5.8.5' ); } } -require utf8; +eval "require utf8"; +die $@ if $@; my $dbh = connect_ok( unicode => 1 ); $dbh->func( "perl_uc", 1, \&perl_uc, "create_function" );