Johan Vromans wrote:

The variable may contain characters that have a special meaning when
used inside a pattern.

You can use either:

        $partbody_boundary = quotemeta($partbody_boundary);
        if ( /$partbody_boundary/ )

or

        if ( /\Q$partbody_boundary\E/ )
How about
     if ( qr/$regexp/ )

Per http://perldoc.perl.org/perlop.html#Regexp-Quote-Like-Operators

you can precompile the regexp this way if necessary.

Reply via email to