my $A = qr (\+#);