my $xml = XMLin( 'file.txt', keeproot => 1 );
print $xml->{'cgi'};