文件操作 - gcc
返回文件管理
返回主菜单
删除本文件
文件: /usr/local/cpanel/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;
修改文件时间
将文件时间修改为当前时间的前一年
删除文件