at (eval 13)[/usr/share/perl/5.28/perl5db.pl:738] line 2.
	eval 'no strict; ($@, $!, $^E, $,, $/, $\\, $^W) = @DB::saved;package main; $^D = $^D | $DB::db_stop;
if ( $str =~ /(\\\\x{[A-F\\d]+})/i ) { print $1 };
' called at /usr/share/perl/5.28/perl5db.pl line 738
	DB::eval called at /usr/share/perl/5.28/perl5db.pl line 3138
	DB::DB called at -e line 1
Unescaped left brace in regex is deprecated here (and will be fatal in Perl 5.30), passed through in regex; marked by <-- HERE in m/(\\x{ <-- HERE [A-F\d]+})/ at (eval 13)[/usr/share/perl/5.28/perl5db.pl:738] line 2.
 at (eval 13)[/usr/share/perl/5.28/perl5db.pl:738] line 2.
	eval 'no strict; ($@, $!, $^E, $,, $/, $\\, $^W) = @DB::saved;package main; $^D = $^D | $DB::db_stop;
if ( $str =~ /(\\\\x{[A-F\\d]+})/i ) { print $1 };
' called at /usr/share/perl/5.28/perl5db.pl line 738
	DB::eval called at /usr/share/perl/5.28/perl5db.pl line 3138
	DB::DB called at -e line 1
Unescaped left brace in regex is deprecated here (and will be fatal in Perl 5.30), passed through in regex; marked by <-- HERE in m/(\\x{ <-- HERE [A-F\d]+})/ at (eval 13)[/usr/share/perl/5.28/perl5db.pl:738] line 2.
 at (eval 13)[/usr/share/perl/5.28/perl5db.pl:738] line 2.
	eval 'no strict; ($@, $!, $^E, $,, $/, $\\, $^W) = @DB::saved;package main; $^D = $^D | $DB::db_stop;
if ( $str =~ /(\\\\x{[A-F\\d]+})/i ) { print $1 };
' called at /usr/share/perl/5.28/perl5db.pl line 738
	DB::eval called at /usr/share/perl/5.28/perl5db.pl line 3138
	DB::DB called at -e line 1
\x{A3f4}