diff options
Diffstat (limited to 'lib/English.pm')
| -rw-r--r-- | lib/English.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lib/English.pm b/lib/English.pm index 1f1e85d47f..6a57ffb2df 100644 --- a/lib/English.pm +++ b/lib/English.pm @@ -11,8 +11,9 @@ English - use nice English (or awk) names for ugly punctuation variables =head1 SYNOPSIS - use English qw( -no_match_vars ) ; # Avoids regex performance penalty use English; + use English qw( -no_match_vars ) ; # Avoids regex performance penalty + # in perl 5.16 and earlier ... if ($ERRNO =~ /denied/) { ... } @@ -32,6 +33,10 @@ See L<perlvar> for a complete list of these. =head1 PERFORMANCE +NOTE: This was fixed in perl 5.18. Mentioning these three variables no +longer makes a speed difference. This section still applies if your code +is to run on perl 5.16 or earlier. + This module can provoke sizeable inefficiencies for regular expressions, due to unfortunate implementation details. If performance matters in your application and you don't need $PREMATCH, $MATCH, or $POSTMATCH, |