my $re5 = qr{
	(?<lookback>
		(?<!
			a
		|
			(?!(?&lookback)) .
		)
	)
	(?<target> \d . )
}msx;
my $re5_short = qr
	/((?<! a |(?!(?-1)).)) (\d.) /sx;