Shell Programming and Scripting

Hi,

I have a html file which is unformatted and need to concatenate the lines between each "table" statement in order to run an awk statement on it. Here is the example of the raw file:

<table border="0" cellspacing="0" cellpadding="0" class="playerDetails">
def
<tr>
<th colspan="3">
Michael Anthony

</th>
</tr>
<tr>
<td>
<ul>

<li><a href="test.txt">Email</a></li>

<li><a href="test2.htm=">See details</a></li>

</td>
<td>
Darren Brown<br />



077087313<br />


Yes<br />

</td>
</tr>
</table>

I need it to end up like:

<table> .....[all other info].....</table>
<table>...[next load of info]......</table>

and so on.....

A job for perl, IMHO....

Code:

#!/usr/bin/perl

open( HANDLE, "< ./somefile" );
@file=<HANDLE>;
close(HANDLE);

$flag=0;

foreach (@file)
{
  if ( $_ =~ "<table" ) {
     $flag=1;
  }
  elsif ( $_ =~ "</table>" ) {
     print( "$_" );
     $flag=0;
  }
  if ( $flag == 1 ) {
     $_ =~ s/\n//g;
     print( "$_" );
  }
}

Cheers
ZB

Awk one liner...

awk '/<table/,/<\/table/{printf $0 ($0~"</table"?"\n":"");next}{print}' file1 > file2

Thanks guys! Worked a charm.