diff --git a/t/03-unusual-inputs.t b/t/03-unusual-inputs.t index ca9b1a3..6477740 100644 --- a/t/03-unusual-inputs.t +++ b/t/03-unusual-inputs.t @@ -112,7 +112,7 @@ subtest { my $target = "Args"; my $junction = abbrev $target; # OUTPUT: "A|Ar|Arg|Args"; my $res = False; - for @w { + for $junction.split(/'|'/) { when /$junction/ { $res = True } default { $res = False } }