leaking_addresses: explicitly name variable used in regex

Currently sub routine may_leak_address() is checking regex against Perl
special variable $_ which is _fortunately_ being set correctly in a loop
before this sub routine is called.  We already have declared a variable
to hold this value '$line' we should use it.

Use $line in regex match instead of implicit $_

Signed-off-by: Tobin C. Harding <me@tobin.cc>
This commit is contained in:
Tobin C. Harding 2018-03-02 08:42:59 +11:00
parent 3482737449
commit 2306a67745

View File

@ -363,7 +363,7 @@ sub may_leak_address
}
$address_re = get_address_re();
while (/($address_re)/g) {
while ($line =~ /($address_re)/g) {
if (!is_false_positive($1)) {
return 1;
}