in reply to Reusing a complex regexp in multiple spots, escaping the regexp

Use <<'PATTERNEND'. It doesn't allow/require escaping.

my $pat = <<'PATTERNEND'; \s PATTERNEND

<<PATTERNEND, aka <<"PATTERNEND" uses the same quoting rules as double-quote literals, so you'd need to esacape characters that are special in double-quote literals, which includes \.

my $pat = <<PATTERNEND; \\s PATTERNEND
my $pat = <<"PATTERNEND"; \\s PATTERNEND

But qr// is better suited for regex patterns.

my $re = qr/ \s /x;