$" = q{|}; my $subsRE = qr{(?x) \b ( @{ [ keys %replacementLU ] } ) \b};