summaryrefslogtreecommitdiff
path: root/tools/convert-xml-to-datadumper
diff options
context:
space:
mode:
Diffstat (limited to 'tools/convert-xml-to-datadumper')
-rwxr-xr-xtools/convert-xml-to-datadumper20
1 files changed, 0 insertions, 20 deletions
diff --git a/tools/convert-xml-to-datadumper b/tools/convert-xml-to-datadumper
deleted file mode 100755
index 003d383..0000000
--- a/tools/convert-xml-to-datadumper
+++ /dev/null
@@ -1,20 +0,0 @@
-#!/usr/bin/perl -w
-
-# In 2.0beta1 XML was used to store all relevant data
-# 2.0beta2 ditched XML and went for Data::Dumper
-
-# This script takes the XML data from STDIN and
-# prints the data in Data::Dumper perl style to stdout
-
-use strict;
-use XML::Parser;
-use XML::Dumper;
-use Data::Dumper;
-
-
-my $parser = new XML::Parser(Style => 'Tree');
-my $tree = $parser->parse( join ('', <stdin>) );
-my $dump = new XML::Dumper;
-my $CONFIG = $dump->xml2pl($tree);
-
-print Data::Dumper->Dump([ $CONFIG ], [ $ARGV[0] ]);