Solved

perl XML::LibXML edit attribute

Posted on 2010-09-08
1
612 Views
Last Modified: 2012-05-10
I am trying to open an XML file, change the value of a single attribute and then save it as another file. I want to use LibXml as this is a standard we use.
I have tried the following and many other combinations but cannot get it to work.

Can anyone help?
my $parser = XML::LibXML->new();

          my $tree = $parser->parse_file($file);

          my $root = $tree->getDocumentElement;

          my $meet_date = $root->getAttribute('meetingdate');

         



          my($node)  = $root->find('@meetingdate');

         $node->setData($meetingdate);



          print $tree->toString;





========== XML file stub ========

<?xml version="1.0" ?> 

- <meeting meetingdate="08 Sep 2010" meetingJetbetnumber="9" meetingType="GR"

Open in new window

0
Comment
Question by:jetbet
1 Comment
 

Accepted Solution

by:
jetbet earned 0 total points
ID: 33632155
I have found the answer myself. Please close this question
foreach my $file (@input_files)

    {

        $input_file = basename($file);

        if ($input_file =~ /(Ver4_)(\d{4}_\d{2}_\d{2})(.*)/)

        {

          $prefix = $1;

          $filedate = $2;

          $suffix = $3;

          my $today = strftime("%Y_%m_%d", localtime);

          $newfilename = $1.$today.$3;

          print ("from $input_file to $newfilename \n");



          $meetingdate = strftime("%d %b %Y", localtime);



          my $parser = XML::LibXML->new();

          my $tree = $parser->parse_file($file);

          my $root = $tree->getDocumentElement;



          $root->setAttribute( 'meetingdate', $meetingdate );



          $tree->toFile('processed/'.$newfilename);



        }

    }

Open in new window

0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A year or so back I was asked to have a play with MongoDB; within half an hour I had downloaded (http://www.mongodb.org/downloads),  installed and started the daemon, and had a console window open. After an hour or two of playing at the command …
Checking the Alert Log in AWS RDS Oracle can be a pain through their user interface.  I made a script to download the Alert Log, look for errors, and email me the trace files.  In this article I'll describe what I did and share my script.
Explain concepts important to validation of email addresses with regular expressions. Applies to most languages/tools that uses regular expressions. Consider email address RFCs: Look at HTML5 form input element (with type=email) regex pattern: T…
Delivering innovative fully-managed cloud services for mission-critical applications requires expertise in multiple areas plus vision and commitment. Meet a few of the people behind the quality services of Concerto.

929 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

10 Experts available now in Live!

Get 1:1 Help Now