perldelta: Clarify removal vs deprecation of modules

[perl5.git] / Porting / check83.pl

diff --git a/Porting/check83.pl b/Porting/check83.pl
old mode 100644 (file)
new mode 100755 (executable)
index 1bd863f..64eac95
--- a/Porting/check83.pl
+++ b/Porting/check83.pl
@@ -62,7 +62,7 @@ if (open(MANIFEST, "MANIFEST")) {
            next;
        }
        while (m!/|\z!g) {
-           my ($dir, $edt) = eight_dot_three($`);
+           my ($dir, $edt) = eight_dot_three("$`");
            next unless defined $dir;
            ($dir, $edt) = map { lc } ($dir, $edt);
            push @{$dir{$dir}->{$edt}}, $_;