Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re^2: running an example script with WWW::Mechanize* module

by Aldebaran (Curate)
on Apr 19, 2020 at 01:25 UTC ( #11115764=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    $ pwd
    /usr/local/share/perl/5.26.1/WWW/Mechanize
    $ ..
    ...
    use Scalar::Util qw(tainted);
    
    use base 'LWP::UserAgent';
    
  2. or download this
    #! /usr/bin/perl
    use warnings;
    use strict;
    ...
        my ( $up, $low ) = @_;
        $low + ( $up - $low ) * ( 0.4 + rand 0.2 );
    }
    
  3. or download this
    #! /usr/bin/perl
    use warnings;
    use strict;
    ...
      $a++;
    }
    
  4. or download this
    $ ./5.pluto.pl 
    script begins with 20000 
    i is 1
    ...
    <no text> at /usr/local/share/perl/5.26.1/WWW/Mechanize/Chrome.pm line
    + 3779.
    3 elements found for input with name 'date' at ./5.pluto.pl line 63.
    $
    
  5. or download this
    2020/04/18 17:18:49 INFO script begins with 20000 
    2020/04/18 17:18:49 INFO Connected to ws://127.0.0.1:35721/devtools/br
    +owser/37b006e1-5a92-4191-b50f-7475ff4d12d9 
    2020/04/18 17:24:03 INFO script begins with 20000 
    ...
    2020/04/18 17:26:33 INFO script begins with 20000 
    2020/04/18 17:26:33 INFO i is 1 
    2020/04/18 17:26:33 INFO Connected to ws://127.0.0.1:43601/devtools/br
    +owser/0c9af664-f568-4f8a-bd7f-496dd9593030
    
  6. or download this
    [FORM] request /cgi-bin/Yoursky
        [INPUT (submit)] <no name>
        [INPUT (radio)] date
    ...
        [SELECT (select-one)] scheme
        [INPUT (checkbox)] edump
        [TEXTAREA (textarea)] elements
    
  7. or download this
    $ wc -l $(locate Chrome.pm)
      5761 /home/hogan/Documents/repos/wmc/WWW-Mechanize-Chrome/lib/WWW/Me
    +chanize/Chrome.pm
      5708 /usr/local/share/perl/5.26.1/WWW/Mechanize/Chrome.pm
     11469 total
    $
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (None)
    As of 2021-10-21 03:03 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?
      My first memorable Perl project was:







      Results (82 votes). Check out past polls.

      Notices?