Okay, one more data point for you. I think the problem is that the message links now look like this:
<a id="folderviewmsg0subjlink" href="/ym/ShowLetter?MsgId=[long string of
numbers]&Idx=0&YY=15285&inc=25&order=down&sort=date&pos=0&view=&head=&box=Inbox">
I don't think the regexp is expecting the id tag in there--<a.href=.*?
will not match that.
I tried altering it to include the id tag, but now it only fetches the
very first message and no other messages no matter which options are
used.
On Sat, Nov 12, 2005 at 10:58:05PM -0500, Adam Kessel wrote:
> The problem is on line 856:
>
> while ( $tmpPage =~ s/^.*?^[\s]*<tr
> class=msg(new|old).*?^<td.*?name="Mid".value="([^"]+)".*?^<td>(.*?)<.*?^<td>.*?^[\s]*<a.href=.*?ShowLetter\?MsgId=([^&]+)&.*?\n(.*?)\n.*?^[\s]*<td
> .*?>(.*?)<.*?^[\s]*<td>(.*?)<//ms ) {
>
> Strangely, perl is totally hanging on this line, at least with the Yahoo
> account I'm testing it with. I even took the $tmpPage stuff content out
> and wrote a one line perl script that just attempts to run the s//
> expression on that string and it maxes out my CPU and hangs. I can't
> understand why perl would ever do this... Something is obviously awry.
>
> I tried it on two separate systems with different perl installations
> (stable and unstable) with same result.
>
> If you remove either the m or the s flag from the end of the regexp, it
> doesn't hang. I'm not sure if that will screw up fetchyahoo otherwise,
> though. Can someone help figure out what's going on here?
signature.asc
Description: Digital signature
