Thanks for replying Nikhil. I had tried something similar earlier but it somehow doesn't work for me. Following is the code. Even the dumper shows nothing. The XML is stored in the file home_flash.xml

    my $debug_file = "F:/Interwoven/OpenDeployNG/solutions/perl/comm/a
+bc/home_edit_glblcnt.log";
    open(OUT, ">$debug_file");
    my $xml = XML::Simple->new();
    my $shoeConfig = $xml->XMLin('f:\\inetpub\\ecomm-static\\us\\html\
+\mi_home_page\\home_flash.xml');
    print OUT Dumper($shoeConfig);
    foreach my $shoe(@{$shoeConfig->{ShoeBank}{Shoe}}){
        my $img = $shoe->{Image};
        my $swf = $shoe->{MainClip};
        print OUT "\img str - ".$img;
        print OUT "\swf str - ".$swf;
        }
[download]