Select Code to Download

my $file='../data/login.xml';
my $parser=XML::LibXML->new();
...
    print $sessione->header(-location=>"fork.cgi");
    
   }

<?xml version="1.0" encoding="UTF-8"?>
<p:login xmlns="http://www.crtp.it" xmlns:xsi="http://www.w3.org/2001/
+XMLSchema-instance" xmlns:p="http://www.crpt.com" xsi:schemaLocation=
+"http://www.crpt.com login.xsd">
    <utenti>
...
                    <dataNascita>26/10/1991</dataNascita>
                    </utenti>
</p:login>