commit ba780fc3a400c018fe0af568d99b35e88b61baee
Author: Alexey Tourbin <at@altlinux.ru>
Date:   Tue Sep 25 22:45:27 2012 +0400

    installperl: fixed missing 0444 -> 0644 case

diff --git a/installperl b/installperl
index f4d850b..88b7d55 100755
--- a/installperl
+++ b/installperl
@@ -24,8 +24,8 @@ BEGIN {
 #
 # In AmigaOS, the 0777 means 'rwed' (e = execute, d = delete),
 # (not 'rwx') and having the 'd' makes updates more convenient.
-my $SO_MODE     = $Is_AmigaOS ? 0777 : 0555;
-my $NON_SO_MODE = $Is_AmigaOS ? 0666 : 0444;
+my $SO_MODE     = $Is_AmigaOS ? 0777 : 0755;
+my $NON_SO_MODE = $Is_AmigaOS ? 0666 : 0644;
 
 my $scr_ext = ($Is_VMS ? '.Com' : $Is_W32 ? '.bat' : '');