|
Server IP : 127.0.0.1 / Your IP : 127.0.0.1 Web Server : Apache/2.4.10 (Win32) OpenSSL/1.0.1i PHP/5.6.3 System : Windows NT WIN-R7LTCC7BPLI 6.3 build 9200 (Windows Server 2012 R2 Datacenter Edition) i586 User : GerbangSIPAD ( 0) PHP Version : 5.6.3 Disable Function : NONE MySQL : ON | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF Directory (0777) : C:/xampp5/htdocs/../php/data/Structures_Graph/ |
| [ Home ] | [ C0mmand ] | [ Upload File ] |
|---|
#!/usr/bin/perl
while (<>) {
if (!/FILESGOHERE/) {
print $_;
} else {
open FILELIST,'find Structures -type f | grep -v .arch-ids |';
while (<FILELIST>) {
$md5sum = `md5sum $_`;
chomp($md5sum);
$md5sum = substr $md5sum, 0, 32;
# $_ =~ s/\//\\\//g;
chomp($_);
print " <file role=\"php\" md5sum=\"$md5sum\" name=\"$_\" />\n";
}
}
}