in reply to Re^5: How do I capture XML into a variable?
in thread How do I capture XML into a variable?
I guess it's time for the "obscure XML::Twig method of the day" link: you can also use the parseurlmethod to get the data directly.
This would do the same thing your code does:
#!/usr/bin/perl -w use strict; use XML::Twig; # to get the entries use YAML; # to dump the data # $entries is a reference to an array of entries # each entry contains { title => <title_text>, content => <content_tex +t> } my $entries=[]; my $twig = XML::Twig->new( twig_handlers => { entry => sub { store_ent +ry( $entries, @_); } } ) ->parseurl( "http://www.frequencyyouth.blogspot.co +m/atom.xml"); print Dump( $entries); exit; sub store_entry { my( $entries, $twig, $entry)= @_; push @$entries, { title => $entry->field( 'title'), content => $en +try->first_child( 'content')->xml_string }; }
|
|---|