Search Results

while read f_name
do
awk 'BEGIN{f=0}
(/^<FORMINFO /){
var="FORMINFO/";
for(i=2;i<=NF;i++)
{
split($i,a,"=");
print a[1]" /"var"@"a[1]
}
f=1;
next
}
(f==1){...

try this

awk 'BEGIN{f=0}
(/^<FORMINFO /){
var="FORMINFO/";
for(i=2;i<=NF;i++)
{
split($i,a,"=");
print a[1]" /"var"@"a[1]
}
f=1;
next
}
(f==1){...

awk 'BEGIN{f=0}
(/^<ROW /){
split($0,a,"\"");
print "ROW_NUM /ROWSET/ROW/@num";
f=1;
next
}
(f==1){
if(/^<\/ROW/)
{
f=0
}
else
{
split($0,a,"<|>");
print...

awk 'BEGIN{f=0}
(/^<ROW /){
split($0,a,"\"");
print "ROW_NUM/ROWSET/ROW/@"a[2];
f=1;
next
}
(f==1){
if(/^<\/ROW/)
{
f=0
}
else
{
split($0,a,"<|>");
print...