#!/usr/bin/perl

use Modern::Perl;
use aXML::Perl;

<use>actions/<qd>action</qd>/body.aXML</use>