$ perl -le '$out = "+44"; $in=quotemeta $out; $out =~ s/$in//; print "Result: |$in|$out|\n";'
Result: |\+44||

##</code><code>##

$ perl -le '$in = "+44"; $out = $in; $out =~ s/\Q$in//; print "Result: |$in|$out|\n";'
Result: |+44||