/
usr
/
local
/
cpanel
/
scripts
/
cpan_sandbox
/
x86_64
/
/usr/local/cpanel/scripts/cpan_sandbox/x86_64
mkdir
upload
Name
Size
Mode
Actions
cc
600
0755
edit
dl
rm
gcc
600
0755
edit
dl
rm
mysql_config
369
0755
edit
dl
rm
perl
574
0755
edit
dl
rm
xml2-config
367
0755
edit
dl
rm
Edit:
/usr/local/cpanel/scripts/cpan_sandbox/x86_64/gcc
(600B)
#!/usr/local/cpanel/3rdparty/bin/perl $ENV{'LANG'} = 'C'; sub sixtyfoursort { if ( $a =~ /64/ ) { return 999999; } $a cmp $b; } my @paths = grep( !/cpan_sandbox/, split( /:/, $ENV{'PATH'} ) ); foreach my $path (@paths) { if ( -x $path . '/' . 'gcc' ) { my @LDS = grep( /^\-L/, @ARGV ); my @NONLDS = grep( !/^\-L/, @ARGV ); @ARGV = sort sixtyfoursort @LDS; push( @ARGV, @NONLDS ); print STDERR "gcc-64bit-hack: enabled\n"; local $ENV{'PATH'} = join( ':', @paths ); exec( $path . '/' . 'gcc', @ARGV ); } } die;
Save
cmd:
run