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