use strict;
-our $VERSION = '3.17';
+our $VERSION = '3.18';
# Subs in this package:
# _default_error($plain, $html) Default error handler
delete @ENV{
qw(PATH_TRANSLATED SCRIPT_NAME SCRIPT_FILENAME PATH_INFO),
- grep { /^REDIRECT_/ } keys %ENV
+ grep /^REDIRECT_/, keys %ENV
};
$ENV{PATH_INFO} = $path_info if defined $path_info;