Thanks a lot GrandFather. But when I am running this code, I am getting following error,
" Name "main::DATA" used only once: possible typo at xml_parser.pl line 8.
readline() on unopened filehandle DATA at xml_parser.pl line 8.
no element found at line 1, column 0, byte -1 at C:/Perl/site/lib/XML/Parser.pm
line 187"
Please help.
Thanks.