Re: XML::Twig oddity

I am just going through all XML::Twig posts and ran to this one and was just testing out the code..

use strict;
use warnings;

use XML::Twig;

my $xml = <<XML
<foo>
   <bar>
      <bay V="A" />
      <baz V="B" />
   </bar>
</foo>
XML

my $t = XML::Twig->new
(
  twig_handlers => { '/foo/bar' => sub
      {
         my $bay = $_->first_child('bay');
         my $baz = $_->first_child('baz');

         print $bay->att("V");
         print $baz->att("V");
       }
   }
);

$t->parse ($xml);
[download]

but it says

./xml_test1.pl
syntax error at ./xml_test1.pl line 17, near "my "
Global symbol "$t" requires explicit package name at ./xml_test1.pl li
+ne 17.
Can't use global $_ in "my" at ./xml_test1.pl line 21, near "= $_"
syntax error at ./xml_test1.pl line 26, near "}"
Execution of ./xml_test1.pl aborted due to compilation errors.
[download]

what am I doing wrong?

Comment on Re: XML::Twig oddity Select or Download Code

Replies are listed 'Best First'.
Re^2: XML::Twig oddity by Anonymous Monk on Nov 15, 2008 at 07:10 UTC
You know, you shouldn't reply to old posts with questions about your typos. Start a new one in seekers of perl wisdom `my $xml = <<XML <foo> <bar> <bay V="A" /> <baz V="B" /> </bar> </foo> XML` [download] is wrong. See Here, doccy doccy. nice doccy. heredoc, treat., Why don't my <<HERE documents work?, perlop	[reply] [d/l]
Re^2: XML::Twig oddity by convenientstore (Pilgrim) on Nov 15, 2008 at 07:34 UTC
that was silly of me thank you for pointing it out `use strict; use warnings; use XML::Twig; my $xml = <<XML; <foo> <bar> <bay V="A" /> <baz V="B" /> </bar> </foo> XML my $t = XML::Twig->new ( twig_handlers => { '/foo/bar' => sub { my $bay = $_->first_child('bay'); my $baz = $_->first_child('baz'); print $bay->att("V"); print $baz->att("V"); } } ); $t->parse ($xml);` [download]	[reply] [d/l]
Re^3: XML::Twig oddity by Anonymous Monk on Nov 15, 2008 at 08:23 UTC
hi :) you should also click the correct "reply" link, or "comment on" link, that way you avoid talking to yourself, and readers can follow what is going on :)	[reply]
Re^4: XML::Twig oddity by convenientstore (Pilgrim) on Nov 15, 2008 at 20:48 UTC
that's what happens to all programmer eventually no? talking to themselves was common pratice I thought Just kidding.. I got you.. thank you for your help!!	[reply]


Don't ask to ask, just ask
	PerlMonks