Win8 Strawberry 5.8.9.5 (32) Wed 09/14/2022 0:21:27
C:\@Work\Perl\monks
>perl
use strict;
use warnings;
# use Data::Dump qw(dd); # for debug
my ($rx_all_units) =
map qr{ (?$1\n}xg;
print $text;
^Z
Visit units
1101
or
2202
, call us at 555-555-2202 and
call before 13 Aug,
2202