!C99Shell v. 1.0 pre-release build #13!

Software: Apache/2.0.54 (Unix) mod_perl/1.99_09 Perl/v5.8.0 mod_ssl/2.0.54 OpenSSL/0.9.7l DAV/2 FrontPage/5.0.2.2635 PHP/4.4.0 mod_gzip/2.0.26.1a 

uname -a: Linux snow.he.net 4.4.276-v2-mono-1 #1 SMP Wed Jul 21 11:21:17 PDT 2021 i686 

uid=99(nobody) gid=98(nobody) groups=98(nobody) 

Safe-mode: OFF (not secure)

/home/jerryg/public_html/gallery2/lib/tools/po/   drwxr-xr-x
Free 318.37 GB of 458.09 GB (69.5%)
Home    Back    Forward    UPDIR    Refresh    Search    Buffer    Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    


Viewing file:     premerge-messages.pl (912 B)      -rw-r--r--
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
#!/usr/bin/perl
#
# Merge the creation date and charset from a def.po file with a ref.pot file
# so that msgmerge does not complain.
#
# This is a brutish hack.
#
use strict;

my $start = '^"Project-Id-Version';
my $end = '^\s*$';
if ($ARGV[0] == '-2') {
  shift; # Keep portion of xx.po header in newly created xx_YY.po
  $start = '^"POT-Creation-Date';
  $end = '^"MIME-Version';
}
my $def_po = shift;
my $ref_pot = shift;

my @header;
my $saving = 0;
open(FD, "<$def_po") or exit;
while (<FD>) {
  chomp;
  if (/$start/) {
    $saving = 1;
  }

  if (/$end/) {
    $saving = 0;
  }

  if ($saving) {
    push(@header, "$_\n");
  }
}
close(FD);

my @lines;
my $replacing = 0;
open(FD, "<$ref_pot") || die;
while (<FD>) {
  if (/$start/) {
    push(@lines, @header);
    $replacing = 1;
  }

  if (/$end/) {
    $replacing = 0;
  }

  unless ($replacing) {
    push(@lines, $_);
  }
}
close(FD);

print @lines;

:: Command execute ::

Enter:
 
Select:
 

:: Search ::
  - regexp 

:: Upload ::
 
[ Read-Only ]

:: Make Dir ::
 
[ Read-Only ]
:: Make File ::
 
[ Read-Only ]

:: Go Dir ::
 
:: Go File ::
 

--[ c99shell v. 1.0 pre-release build #13 powered by Captain Crunch Security Team | http://ccteam.ru | Generation time: 0.029 ]--