REDROOM

PHP 5.6.40

Path:

Navigation

Breadcrumbs

/ / scripts / cpan_sandbox / x86_64

Create

Create File | Create Folder | Upload Files | Run Command

Preview: gcc Size: 600 B

//scripts/cpan_sandbox/x86_64/gcc

#!/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;

Directory Contents

Dirs: 0 × Files: 5

Sort:

Enable drag-to-move

Name	Size	Perms	Modified	Actions
cc	600 B	lrwxr-xr-x	2015-02-11 17:35:34	Edit Download recursive recursive
gcc	600 B	lrwxr-xr-x	2015-02-11 17:35:34	Edit Download recursive recursive
mysql_config	369 B	lrwxr-xr-x	2015-02-11 17:35:34	Edit Download recursive recursive
perl	574 B	lrwxr-xr-x	2015-02-11 17:35:34	Edit Download recursive recursive
xml2-config	367 B	lrwxr-xr-x	2015-02-11 17:35:34	Edit Download recursive recursive