#! /perl/bin/perl -w use strict; use CGI; use Data::Dumper; use XML::Simple; print "Content-type: text/html\n\n"; print ""; print '

testing

'; my $q = CGI::new; print "
" . Dumper($q) . '
'; print qq[
fld1
fld2
]; print '';