Re: Extraction problem with Template::Extract


Your skill will accomplish what the force of many cannot
	PerlMonks

Re: Extraction problem with Template::Extract

by broquaint (Abbot)

on Apr 04, 2006 at 15:00 UTC ( [id://541156]=note: print w/replies, xml )

Need Help??

in reply to Extraction problem with Template::Extract

You'll need to version 0.40 for this to work:

use Template::Extract;

my $template = <<'EOD';
[% FOR records %]
[% ... %]
 OAMPG: [% oampg %]   Extent ID [% extent_id %] on allocation page [% 
+alloc_pg =~ /(\d+)/%]
[% END %]
EOD

my $doc = <<EOD;
 OAMPG: 600   Extent ID 608 on allocation page 512
 OAMPG: 128   Extent ID 616 on allocation page 512
EOD

use Data::Dump::Streamer;
Dump(Template::Extract->new->extract($template, $doc));
[download]

I'm not sure what the exact problem is with Template::Extract but I suspect it is because it needs a trailing token for the match to halt.

HTH

_________ broquaint

Comment on Re: Extraction problem with Template::Extract Download Code

Replies are listed 'Best First'.
Re^2: Extraction problem with Template::Extract by jfroebe (Parson) on Apr 04, 2006 at 18:50 UTC
That makes sense... I'm glad it isn't my brain sans caffeine that is the issue ;-) Jason L. Froebe Team Sybase member No one has seen what you have seen, and until that happens, we're all going to think that you're nuts. - Jack O'Neil, Stargate SG-1	[reply]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

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

Chatterbox^?

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

Other Users^?

Others about the Monastery: (7)

As of 2024-04-18 09:51 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found