summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-12-12 21:26:23 -0700
committerYves Orton <demerphq@gmail.com>2022-12-18 18:56:09 +0100
commit8bb94d74fa4c2d935e37956ea7d2c837d7c91d42 (patch)
tree28b6d391301ecbc73c530e8138221f962f055b5c /t
parent8eb5958fef7a2431f951b5ffb77ad7703fcfb34c (diff)
downloadperl-8bb94d74fa4c2d935e37956ea7d2c837d7c91d42.tar.gz
harness: Assign name to $2
It's clearer, and a future commit will destroy $2 before its final use
Diffstat (limited to 't')
-rw-r--r--t/harness3
1 files changed, 2 insertions, 1 deletions
diff --git a/t/harness b/t/harness
index 33ccc09cdc..6cc49f82ca 100644
--- a/t/harness
+++ b/t/harness
@@ -194,9 +194,10 @@ if (@ARGV) {
\z !x)
{
my $path = $1;
+ my $name = $2;
$all_dirs{$path} = 1;
- $serials{$path} = 1 if $2 =~ / \A 0 /x;
+ $serials{$path} = 1 if $name =~ / \A 0 /x;
}
}