avoid syntax that's not understood by perl 5.8

gugod · Aug 4, 2022 · c7bfa2d · c7bfa2d
1 parent 3d3f421
commit c7bfa2d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/App/perlbrew.pm b/lib/App/perlbrew.pm
@@ -2666,7 +2666,7 @@ sub list_modules {
         "TAP::Harness::Multiple" => "TAP::Harness::ReportByDescription",
     );
 
-    return [map { $rename{$_} // $_ } grep { $_ ne "Perl" } split( /\n/, $stdout )];
+    return [map { $rename{$_} || $_ } grep { $_ ne "Perl" } split( /\n/, $stdout )];
 }
 
 sub run_command_list_modules {