On Monday 09 December 2002 10:47, aj wrote:
> I would think if I could do a split on this the top line with a variable
> amount of spaces and then I would just remove the second portion of the
> line.
Something like this then?
while (<DATA>)
{
my ($keep) = split /\s{2,}/, $_;
}
-- c