summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--Bugzilla/Util.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/Bugzilla/Util.pm b/Bugzilla/Util.pm
index 4dc64fe94..91e66f9f8 100644
--- a/Bugzilla/Util.pm
+++ b/Bugzilla/Util.pm
@@ -59,20 +59,20 @@ sub is_tainted {
sub trick_taint {
require Carp;
Carp::confess("Undef to trick_taint") unless defined $_[0];
- $_[0] =~ /^(.*)$/s;
- $_[0] = $1;
+ my ($match) = $_[0] =~ /^(.*)$/s;
+ $_[0] = $match;
return (defined($_[0]));
}
sub detaint_natural {
- $_[0] =~ /^(\d+)$/;
- $_[0] = $1;
+ my ($match) = $_[0] =~ /^(\d+)$/;
+ $_[0] = $match;
return (defined($_[0]));
}
sub detaint_signed {
- $_[0] =~ /^([-+]?\d+)$/;
- $_[0] = $1;
+ my ($match) = $_[0] =~ /^([-+]?\d+)$/;
+ $_[0] = $match;
# Remove any leading plus sign.
if (defined($_[0]) && $_[0] =~ /^\+(\d+)$/) {
$_[0] = $1;