aboutsummaryrefslogtreecommitdiff
path: root/scripts/xml-parse-test.pl
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/xml-parse-test.pl')
-rwxr-xr-xscripts/xml-parse-test.pl12
1 files changed, 11 insertions, 1 deletions
diff --git a/scripts/xml-parse-test.pl b/scripts/xml-parse-test.pl
index 34a0be58..39e746cd 100755
--- a/scripts/xml-parse-test.pl
+++ b/scripts/xml-parse-test.pl
@@ -1,5 +1,9 @@
-:
# $Id$
+#
+# Test of XML::Simple as a tool for encoding and decoding
+#
+# http://mirin.apnic.net/resourcecerts/wiki/index.php/IR-ISP_Definition
+
eval 'exec perl -w -S $0 ${1+"$@"}'
if 0;
@@ -25,6 +29,12 @@ my @xml = ('
cert_serial="serial"
cert_aki="g(aki)"
status="keyword" />
+ <list_class ca="ca_name"
+ cert_url="url"
+ cert_ski="g(ski)"
+ cert_serial="serial"
+ cert_aki="g(aki)"
+ status="keyword" />
<!-- [repeated for each active class where the ISP has resources] -->
</message>
','