| Subject: | [PATCH] HTML/TableExtract.pm (new): fixed $Dpat param match |
| Date: | Tue, 12 Aug 2008 00:45:39 +0400 |
| To: | bug-HTML-TableExtract [...] rt.cpan.org |
| From: | Alexey Tourbin <at [...] altlinux.ru> |
---
lib/HTML/TableExtract.pm | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/lib/HTML/TableExtract.pm b/lib/HTML/TableExtract.pm
index a2f5cd1..8ffe027 100644
--- a/lib/HTML/TableExtract.pm
+++ b/lib/HTML/TableExtract.pm
@@ -79,7 +79,7 @@ sub new {
or croak "Param '$k' must be passed in ref to array\n";
$parms{$k} = $v;
}
- elsif ($k =~ /^$Dpat$/) {
+ elsif ($k =~ /^(?:$Dpat)$/) {
$parms{$k} = $v;
}
else {
--
1.5.6.5.GIT