perl-modperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From "Perrin Harkins" <phark...@gmail.com>
Subject Re: MP1 Security issue (was Re: [mp1] PerlRun fails if path_info contains special symbols)
Date Fri, 23 Mar 2007 03:55:45 GMT
On 3/22/07, Andy Armstrong <andy@hexten.net> wrote:
>       $path_info = quotemeta $path_info;
>       my $script_name = $path_info && $self->{URI} =~ /$path_info$/

You can in-line that to avoid clobbering the original:
my $script_name = $path_info && $self->{URI} =~ /\Q$path_info\E$/

- Perrin

Mime
View raw message