Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: perl substitute..try this

by stylechief (Sexton)
on Nov 07, 2013 at 00:17 UTC ( #1061506=note: print w/replies, xml ) Need Help??


in reply to perl substitute

It looks like you want to remove namespaces, and don't want to mess with validating the XML with a DTD

# suppressing DTD validation and errors due to no DTD validation my $parser = XML::LibXML->new(load_ext_dtd => 0, expand_entities => 0, + suppress_errors => 1);

From XML::LibXML::Element:

setAttributeNS

  $node->setAttributeNS( $nsURI, $aname, $avalue );

Namespace-aware version of setAttribute, where $nsURI is a namespace URI, $aname is a qualified name, and $avalue is the value. The namespace URI may be null (empty or undefined) in order to create an attribute which has no namespace.

or...

removeAttribute

  $node->removeAttribute( $aname );

The method removes the attribute $aname from the node's attribute list, if the attribute can be found.

SC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1061506]
help
Chatterbox?
[ovedpo15]: consider the following format of strings: some_data-doesn't- matter,value. how I get the value with regex? it should be after the last comma (last string)
[Corion]: Text::CSV_XS for all your CSV file parsing needs. Other than that, what problems do you have with perlre, and capturing everything after the comma? Also, index and substr would also work.
[choroba]: my ($value) = $string =~ /.*,(.*)/
[choroba]: The .* at the beginning matches the longest possible substring, so it eats any previous commas
[choroba]: But for CSV, use appropriate modules

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (6)
As of 2018-05-27 08:50 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?