graphics programming with perl - manning 2002

... Piergies, and Lianna Wlasiuk. Graphics Programming with Perl xxiabout the cover illustrationThe figure on the cover of Graphics Programming with Perl is from a Spanish com-pendium of regional dress ... graphics tasks in Perl. So I accepted the challenge and started working, with the goal of providing a bookthat would sum up the ways to work with graphics from within Perl, and to offer suf-ficient ... 295xiiiprefaceWelcome to Graphics Programming with Perl. When Manning Publications contactedme to assess my interest in writing a book about graphics programming for the Perl language, I was a...

programming the network with perl - wiley 2002

... varieties.The -w part of the Perl command is a switch asking Perl to compile the code with extra warnings enabled. Until you know what you are doing, the advice is toalways run Perl with the -w switch.Oh, ... " ;Programming the Network with Perl& quot;,’Year’ => 2002 };Or, this code would also do:%hash = ( ’Name’ => "Paul Barry",’Book’ => " ;Programming the Network with Perl& quot;,’Year’ ... Resources is provided to facil-itate further study. All chapters conclude with a set of programming exercises.Who should read this book? Programming the Network with Perl evolved from my involvement...

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-Since ... addition to no-cache. See Appendix A for more information. If-Modified-Since, et al. To accommodate client-side caching of documents, the client can use the If-Modified-Since header with the GET...

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 connections ... If the user only wants the response code, he can use the -r option. Similarly, the -H option specifies that only headers are wanted. A -d option prints out only the entity body. One can mix these...

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 ); } # ... "usage: $0 -rhHd URL(s)\n"; print " -h help\n"; print " -r print out response\n"; print " -H print out header\n"; print " -d print out data\n\n";...

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 argument, the User-Agent ... $myobject->('content-type') would return the value for the object's Content-type header. To define a new header value, invoke header( ) with an associative array with header...

Web Client Programming with Perl-Chapter 5: The LWP Library- P2

... HTTP::Request('GET', $ARGV[0]); my $response = $ua->request($request); if ($response->is_success) { print $response->content; } else { print $response->error_as_HTML; } have to call the ... 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 information. 5. Or a subclass of HTML::Parser, ... "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');...

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 text when -h or ... $headers=$response->headers_as_string; my $body = $response->content; $body = $response->error_as_HTML if ($response->is_error); return ($code, $desc, $headers, $body); } Within...

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 url ... %{ $self->{'bad'} }; undef %{ $self->{'not_web'} }; undef %{ $self->{'local'} }; undef %{ $self->{'remote'} }; undef %{ $self->{'type'}...

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', '</H4>', -font ... 'lucidasans-bold-12'); $text->tag('configure', '</H5>', -font => 'lucidasans-bold-12'); $text->tag('configure', '</H6>', -font...

Xem thêm