#Word boundries are zero-width so the regex engine will never progress my $inf; $inf=qr/\b(??{$inf})/;