@Ghazascanner
_2019runbot
Ghazascanner File Manager
server :Linux phosweb012 3.10.0-1160.el7.x86_64 #1 SMP Mon Oct 19 16:18:59 UTC 2020 x86_64
Current Path :
/
homepage
/
cgi-bin
/
galle
/
_dll
/
Path :
Upload File :
New :
File
Dir
/homepage/cgi-bin/galle/_dll/write_xml.pl
open FILE, "$lfolda/cd_$F{'xml'}.dat"; @body=<FILE>; close(FILE); print <<EOC; Content-type: text/xml <?xml version="1.0"?> <album> <URL dir="$ifolda"> EOC foreach (@body){ ($Bnow,$type,$WV,$HV,$size)=split(/<>/, $_); print "<img src=\"$Bnow.jpg\" />\n"; } print "</URL>\n<HEIGHT>\n"; foreach (@body){ ($Bnow,$type,$WV,$HV,$size)=split(/<>/, $_); print "<hit src=\"$HV\" />\n"; } print "</HEIGHT>\n<WIDTH>\n"; foreach (@body){ ($Bnow,$type,$WV,$HV,$size)=split(/<>/, $_); print "<wid src=\"$WV\" />\n"; } print "</WIDTH>\n<TYPE>\n"; foreach (@body){ ($Bnow,$type,$WV,$HV,$size)=split(/<>/, $_); print "<typ src=\"$type\" />\n"; } print "</TYPE>\n</album>"; exit; 1;