Code change : $data = $xml->XMLin($file,SearchPath => '.');

OUTPUT

Input file :layer.xml:
Unrecognised option: SearchPath at parse_report_layerxml.pl line 13