automating windows with perl - miller freeman 1999
automating windows with perl - miller freeman 1999
... where Windows would most likely be used.
By the terms
Win32
and
Windows
I mean a 32-bit Microsoft Windows operating
system such as Windows NT, Windows 95, or Windows 98. For the Perl programmer, ... this book.
Got Perl?
You can finally get a single, unified Perl for Windows. Starting with Perl v5.005, both
the UNIX and Windows versions of Perl come from the sa...
mastering algorithms with perl - o'reilly 1999
... Associates, Inc.
101 Morris Street
Sebastopol, CA 95472
80 0-9 9 8-9 938 (in the U.S. or Canada)
70 7-8 2 9-0 515 (international/local)
70 7-8 2 9-0 104 (FAX)
You can also send us messages electronically. ... addition to the Perl language in Perl 5 is references, their use is described
in the perlref documentation bundled with Perl. A reference is a scalar value (thus, all...
Web Client Programming with Perl-Chapter 3: Learning HTTP- P3
...
Date: Sat, 20-May-95 03:25:12 GMT
Server: NCSA/1.3
MIME-version: 1.0
Content-type: text/html
Last-modified: Wednesday, 14-Mar-95 18:15:23 GMT
Content-length: 1029
[Entity-body data]
In ... example If-Modified-Since header might read:
If-Modified-Since: Fri, 02-Jun-95 02:42:43 GMT
The same formats accepted for the Date header (listed in Appendix A) are
used for the If-Modified-Sin...
Web Client Programming with Perl-Chapter 4: The Socket Library- P1
... $opt_H, $opt_d);
}
The call to Getopts( ) indicates that we're interested in the -h, -H, -r, and -d
command-line options. When Getopts( ) finds these switches, it sets $opt_*
(where * is the ... handle to associate with the socket, what
the network protocol is, and whether the socket should be stream-oriented or
record-oriented. For HTTP transactions, sockets are stream-oriented...
Web Client Programming with Perl-Chapter 4: The Socket Library- P2
... and entity-body
to not echo to STDOUT. This isn't needed anymore in the context of this
program. Also, instead of parsing the -r, -H, and -d command-line
arguments, we look for -i for displaying ... "usage: $0 -hil URL(s)\n";
print " -h help\n";
print " -i print out image
URLs\n";
print " -l print out hyperlink
URLs\n";
exit (-1 );...
Web Client Programming with Perl-Chapter 5: The LWP Library- P1
...
$request->header('content-length' => 2);
$request->header('content-type' =>
'text/plain');
$request->content('hi');
print $request->as_string( ...
$ua->agent([$product_id])
When invoked with no arguments, this method returns the current
value of the identifier used in the User-Agent HTTP header. If
invoked with an argum...
Web Client Programming with Perl-Chapter 5: The LWP Library- P2
... "ls -l", and
Windows "dir", among others. When a time zone is not implicit in the
$response->header('content-type' =>
'text/plain');
$response->content('hi'); ... deallocate memory used by the tree. Future versions of Perl or
LWP may handle this automatically. See online documentation at
www .perl. com for up-to-date informat...
Web Client Programming with Perl-Chapter 6: Example LWP Programs-P1
... "HELP";
usage: $0 [-hilp] [proxy URL] URLs
-h help
-i grep out images references only
-l grep out hyperlink references only
-p use this proxy server
Example: $0 -p http://proxy:8080/ ... command-line processing with getopts( ):
getopts('hilp:');
my $all = !($opt_i || $opt_l); # $all=1 when
-i -l not set
if ($opt_h || $#ARGV= =-1 ) { # print help tex...
Web Client Programming with Perl-Chapter 6: Example LWP Programs-P2
... Tk extension to Perl.
Usage: $0 URL\n
Options:
-l Display local URLs
-r Display remote URLs
-R Display which HTML pages refers to
what
-n Display non-HTML links
-b Display bad ... (default)
-a Display all of the above
-v Print out URLs when they are examined
-e email Mandatory: Specify email address to
include
in HTTP request.
-m # Examine at most # URLs\n
-p ur...
Web Client Programming with Perl-Chapter 7: Graphical Examples with Perl/Tk- P1
...
$scroll->configure(-command => ['yview', $text]);
$scroll->pack(-side => 'right', -expand => 'no', -
fill => 'y');
$text->pack(-side ...
'lucidasans-bold-18');
$text->tag('configure', '</H3>', -font =>
'lucidasans-bold-14');
$text->tag('configure', '<...