Re: Search and replace in portion of xml file


Perl: the Markov chain saw
	PerlMonks

Re: Search and replace in portion of xml file

by Jenda (Abbot)

on Jun 01, 2009 at 22:22 UTC ( #767397=note: print w/replies, xml )

Need Help??

in reply to Search and replace in portion of xml file

use XML::Rules;

my $parser = XML::Rules->new(
  style => 'filter',
  rules => {
    article => sub {
      my ($tag,$attr) = @_;
      $attr->{_content} =~ s/EM/E/g;
      return $tag => $attr;
    }
  }
);

$parser->filterfile( 'a.xml', 'b.xml');
[download]

Jenda
Enoch was right!
Enjoy the last years of Rome.

Comment on Re: Search and replace in portion of xml file Download Code

Replies are listed 'Best First'.
Re^2: Search and replace in portion of xml file by sandy1028 (Sexton) on Jun 02, 2009 at 09:27 UTC
Thanks for all the replies. I am trying to replace the text ctrl+O which is ^O in the file. `open FH,'a.txt'; @data=<FH>; foreach $dat (@data){ $dat =~ s/\^O/ /g; }` [download] I am trying to replace the control characters with a space but no luck. Please can you suggest me how to proceed	[reply] [d/l]
Re^3: Search and replace in portion of xml file by Jenda (Abbot) on Jun 02, 2009 at 10:58 UTC
Perl doesn't understand what do you mean by that \^O. Try \x0F instead. Jenda Enoch was right! Enjoy the last years of Rome.	[reply]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://767397]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others romping around the Monastery: (5)

As of 2023-12-08 15:38 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?