Parse tag-delimited input file

icg has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Parse tag-delimited input file by Joost (Canon) on May 27, 2005 at 12:51 UTC
see split, perlopentut and perldata update: and maybe substr. update2: oh yeah, and how (not) to ask a question: the exact answer to your question is "probably" "What should it profit a man, if he should win a flame war, yet lose his cool?"	[reply]
Re: Parse tag-delimited input file by dragonchild (Archbishop) on May 27, 2005 at 12:56 UTC
In addition to Joost's excellent pointers, a sample would go a long way in receiving help. Even better would be what you tried to do to solve your problem and why you think it's not working. We, as a community, prefer to edit than to create, at least when answering questions. In general, if you think something isn't in Perl, try it out, because it usually is. :-) "What is the sound of Perl? Is it not the sound of a wall that people have stopped banging their heads against?"	[reply]
Re: Parse tag-delimited input file by holli (Abbot) on May 27, 2005 at 13:19 UTC
like this? If not, show us sample input. holli, /regexed monk/	[reply] [d/l]
Re^2: Parse tag-delimited input file by icg (Acolyte) on May 27, 2005 at 14:13 UTC
Input file looks like this: AN 0005 SR SI CO Me GH EL ub.com UR http://www.xxx.com MA Me Gm Output should be like this: AN 0005 SR CO Me GH ... ...	[reply]
Re^3: Parse tag-delimited input file by holli (Abbot) on May 27, 2005 at 14:33 UTC
`use strict; use warnings; my $input = "AN 0005 SR SI CO Me GH EL ub.com UR http://www.xxx.com MA + Me Gm"; my @input = split / +/, $input; print "@input[0..2,4..6] ... ..."; #AN 0005 SR CO Me GH ... ...` [download] holli, /regexed monk/	[reply] [d/l]