Search Results

Using the sample data I obtained the requested output using this script

#!/usr/bin/ksh

gawk -v name=$1 '
BEGIN{
RS = "</record>"; FS = "\n"; ORS = "</record>"
}

{
pos =...

As I understand your problem, using Perl (and your sample data) I believe this will give you what you want.

#!/usr/bin/perl
my @fields;
my @hold;
my $key1;
my $x;
my $i;
open INPUT,...

As I understand your question, using Perl (and your sample data file) this code should do what you need:

#!/usr/bin/perl
my @array1;
my $key1;
open INPUT, "<datfile";
open OUTPUT, ">outfile";...