diff options
author | Peter Palfrader <peter@palfrader.org> | 2004-04-28 11:42:43 +0000 |
---|---|---|
committer | Peter Palfrader <peter@palfrader.org> | 2004-04-28 11:42:43 +0000 |
commit | dbdc151819c2e0d8b26d986013a4f59ba238b964 (patch) | |
tree | 9abb2714b92d86b320a8090dc473bfef83419d45 /tools/convert-xml-to-datadumper | |
parent | 8ef616488acdb38f82f46effbca498a7d7f91046 (diff) |
Removed obsolete tools to convert echolot setups during 2.0beta* releases
Diffstat (limited to 'tools/convert-xml-to-datadumper')
-rwxr-xr-x | tools/convert-xml-to-datadumper | 20 |
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] ]); |