Уважаемые, коллеги!
Помогите челловеку, который начинает свое знакомство с perl.
Надо сделать вебку которая постом принимает xml, проверяет некоторые вещи и отвечает тем же xml.
На данный момент есть следующее:

автор#!/usr/bin/perl -T

use strict;
use XML::Simple;
use CGI qw();
use Data::Dumper;

my $cgi = CGI->new;
my $xml = $cgi->param('POSTDATA');
print "Content-type: text/html\n\n";

my $simple = XML::Simple->new(ForceArray => 1, KeepRoot => 1);
my $data = $simple->XMLin($xml);

print Dumper($data) . "\n";
В результате отправленая POST-ом xml выводиться в броузере.
Например вот так:
автор$VAR1 = {
'Transfer' => [
{
'action' => 'Presearch',
'xmlns' => 'http://abc.com',
'Data' => [
{
'xmlns:xsi' => 'http://www.abcd.com',
'Unit' => {
'ls' => {
'value' => '710005007302'
}
},
'xsi:type' => 'Payer'
}
],
'interface' => 'Debt'
}
]
};

Как создать переменную со значением параметра "action", например? То есть, как в результате получить переменную $x со значением "Presearch"?
Заранее спасибо за любые советы)
P.S. Perl 5

White Owl,

Спасибо. Но эту доку я 8 раз перечитал.
К сожаленью, мои знания чуть ниже чем порог вхождения.

Кстати, правильный ответ: