Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re^3: Automated DNS Update Solution Needed

by Hero Zzyzzx (Curate)
on Dec 21, 2004 at 20:26 UTC ( #416612=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Automated DNS Update Solution Needed
in thread Automated DNS Update Solution Needed

That's an <input type="text" name="q">, not a <textarea name="q"></textarea>, on googles homepage, right?

-Any sufficiently advanced technology is
indistinguishable from doubletalk.

My Biz


Comment on Re^3: Automated DNS Update Solution Needed
Select or Download Code
Replies are listed 'Best First'.
Re^4: Automated DNS Update Solution Needed
by PodMaster (Abbot) on Dec 22, 2004 at 07:19 UTC
    Heh, yeah, sorry about that. Still, Mechanize does deal with it, actual demonstration this time :)

    C:\>perl -MWWW::Mechanize::Shell -e shell
    Module File::Modified not found. Automatic reloading disabled.
    >get http://babelfish.altavista.com/
    Retrieving http://babelfish.altavista.com/(200)
    http://babelfish.altavista.com/>form 1
    POST http://babelfish.altavista.com/tr [frmTrText]
     doit=done                      (hidden readonly)
     intl=1                         (hidden readonly)
     tt=urltext                     (hidden readonly)
     trtext=                        (textarea)
     lp=                            (option)   [*/Select from and to languages|zh_en/Chinese-simp to English|zt_en/Chinese-trad to English|en_zh/English
    to Chinese-simp|en_zt/English to Chinese-trad|en_nl/English to Dutch|en_fr/English to French|en_de/English to German|en_el/English to Greek|en_it/Engl
    ish to Italian|en_ja/English to Japanese|en_ko/English to Korean|en_pt/English to Portuguese|en_ru/English to Russian|en_es/English to Spanish|nl_en/D
    utch to English|nl_fr/Dutch to French|fr_en/French to English|fr_de/French to German|fr_el/French to Greek|fr_it/French to Italian|fr_pt/French to Por
    tuguese|fr_nl/French to Dutch|fr_es/French to Spanish|de_en/German to English|de_fr/German to French|el_en/Greek to English|el_fr/Greek to French|it_e
    n/Italian to English|it_fr/Italian to French|ja_en/Japanese to English|ko_en/Korean to English|pt_en/Portuguese to English|pt_fr/Portuguese to French|
    ru_en/Russian to English|es_en/Spanish to English|es_fr/Spanish to French]
     <NONAME>=Translate             (submit)
    http://babelfish.altavista.com/>value lp en_nl
    http://babelfish.altavista.com/>value trtext I am Bob.
    http://babelfish.altavista.com/>
    http://babelfish.altavista.com/>submit
    200
    http://babelfish.altavista.com/tr>forms
    Form [1]
    GET http://www.altavista.com/web/results
     q=Ik ben Loodje.               (hidden readonly)
     kls=0                          (hidden readonly)
     ienc=utf8                      (hidden readonly)
     search=Search the web with this text (submit)
    Form [2]
    POST http://babelfish.altavista.com/tr [frmTrText]
     doit=done                      (hidden readonly)
     intl=1                         (hidden readonly)
     tt=urltext                     (hidden readonly)
     trtext=I am Bob.               (textarea)
     lp=en_nl                       (option)   [zh_en/Chinese-simp to English|zt_en/Chinese-trad to English|en_zh/English to Chinese-simp|en_zt/English t
    o Chinese-trad|*en_nl/English to Dutch|en_fr/English to French|en_de/English to German|en_el/English to Greek|en_it/English to Italian|en_ja/English t
    o Japanese|en_ko/English to Korean|en_pt/English to Portuguese|en_ru/English to Russian|en_es/English to Spanish|nl_en/Dutch to English|nl_fr/Dutch to
    French|fr_nl/French to Dutch|fr_en/French to English|fr_de/French to German|fr_el/French to Greek|fr_it/French to Italian|fr_pt/French to Portuguese|
    fr_es/French to Spanish|de_en/German to English|de_fr/German to French|el_en/Greek to English|el_fr/Greek to French|it_en/Italian to English|it_fr/Ita
    lian to French|ja_en/Japanese to English|ko_en/Korean to English|pt_en/Portuguese to English|pt_fr/Portuguese to French|ru_en/Russian to English|es_en
    /Spanish to English|es_fr/Spanish to French]
     <NONAME>=Translate             (submit)
    http://babelfish.altavista.com/tr>

    MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
    I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
    ** The third rule of perl club is a statement of fact: pod is sexy.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (19)
As of 2015-07-29 16:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (265 votes), past polls