Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.20
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
doc /
libxml-rss-perl /
examples /
[ HOME SHELL ]
Name
Size
Permission
Action
0.9
[ DIR ]
drwxr-xr-x
0.91
[ DIR ]
drwxr-xr-x
1.0
[ DIR ]
drwxr-xr-x
2.0
[ DIR ]
drwxr-xr-x
README
164
B
-rw-r--r--
convert.pl
569
B
-rw-r--r--
create_rss_multiple.pl
1.87
KB
-rw-r--r--
rss2html.pl
2.6
KB
-rw-r--r--
rss_info.pl
658
B
-rw-r--r--
update_rss.pl
407
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : convert.pl
#!/usr/bin/perl use strict; use warnings; use XML::RSS (); # print an error unless there are 2 command-line args syntax() unless @ARGV == 2; # get rss file and version to convert to from # the command line my ($file,$version) = @ARGV; # create new instance my $rss = XML::RSS->new; # set output version $rss->{output} = $version unless $version eq 'default'; # parse the rss file $rss->parsefile(shift); # output the new RSS to STDOUT print $rss->as_string; sub syntax { die "Syntax: convert.pl <file.rss> <version>\n ex: convert.pl fm.rdf 1.0\n\n"; }
Close
