Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: Mechanize not recognizing link in <META HTTP-EQUIV="Refresh"

by ForgotPasswordAgain (Deacon)
on Nov 01, 2007 at 09:02 UTC ( #648450=note: print w/ replies, xml ) Need Help??


in reply to Mechanize not recognizing link in <META HTTP-EQUIV="Refresh"

Try looking at the module's source code. I quickly found _link_from_token, which contains this:

if ( $tag eq 'meta' ) { my $equiv = $attrs->{'http-equiv'}; my $content = $attrs->{'content'}; return unless $equiv && (lc $equiv eq 'refresh') && defined $c +ontent; if ( $content =~ /^\d+\s*;\s*url\s*=\s*(\S+)/i ) { $url = $1; $url =~ s/^"(.+)"$/$1/ or $url =~ s/^'(.+)'$/$1/; } else { undef $url; } } # meta

Does your URL match that regex? Maybe there is a bug.


Comment on Re: Mechanize not recognizing link in <META HTTP-EQUIV="Refresh"
Select or Download Code
Re^2: Mechanize not recognizing link in <META HTTP-EQUIV="Refresh"
by Anonymous Monk on Nov 02, 2007 at 03:27 UTC
    of course that will match, he probably has a really old version of mechanize

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://648450]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (3)
As of 2014-10-02 03:10 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    What is your favourite meta-syntactic variable name?














    Results (45 votes), past polls