The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

PXML::Tags

SYNOPSIS

 use PXML::Tags qw(records
     protocol-version
     record);
 my $xml= RECORDS(PROTOCOL_VERSION("1.0"),
                  RECORD("Hi"), RECORD("there!"));
 is ref($xml), "PXML::Element";
 is $xml->string, '<records><protocol-version>1.0</protocol-version><record>Hi</record><record>there!</record></records>';

DESCRIPTION

Creates tag wrappers that return PXML elements. The names of the wrappers are all uppercase, and "-" is replaced with "_".