Re: Hexadecimal character references not understood inside a regex

The following ought to work in any vaguely recent version of Perl...

#!/usr/bin/env perl

use strict;
use warnings;

my $string = "ABC";
$string =~ s/\x{41}/\x{61}/g;
print $string, "\n"; # aBC
[download]

package Cow { use Moo; has name => (is => 'lazy', default => sub { 'Mooington' }) } say Cow->new->name

Comment on Re: Hexadecimal character references not understood inside a regex Download Code