> >May I suggest:
> >(my $A = $a) =~ s/^<tr><td>(\d+)<\/td>/$1/;
> >(my $B = $b) =~ s/^<tr><td>(\d+)<\/td>/$1/;
>
> That's not what he's doing. He's doing:
>
> my ($A) = $a =~ m{^<tr><td>(\d+)</td>};
> my ($B) = $b =~ m{^<tr><td>(\d+)</td>};
>
> Yours leaves everything after the </td> tacked onto the end
> of $A; mine and his only store the number in $A.
Argh, good catch. I usually do that kind of thing like:
my $A = $1 if $a =~ m{^<tr><td>(\d+)</td>};
But I didn't that time :)
Let us know if any of this fixes your problem, Martin...
-dave
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
