my $d = $xml->XMLin("sample.xml");