Perl & LWP pot
... #!/usr/bin /perl -w use strict; use LWP; my $browser = LWP: :UserAgent->new( ); my $response = $browser->get("http://www.oreilly.com/"); print $response->header("Server"), "\n"; The ... Example 1-1. Count " ;Perl& quot; in the O'Reilly catalog #!/usr/bin /perl -w use strict; use LWP: :Simple; my $catalog = get("http://www.oreil...
Ngày tải lên: 23/03/2014, 00:20
Perl & LWP pptx
... #!/usr/bin /perl -w use strict; use LWP; my $browser = LWP: :UserAgent->new( ); my $response = $browser->get("http://www.oreilly.com/"); print $response->header("Server"), "\n"; The ... Example 1-1. Count " ;Perl& quot; in the O'Reilly catalog #!/usr/bin /perl -w use strict; use LWP: :Simple; my $catalog = get("http://www.oreil...
Ngày tải lên: 17/03/2014, 17:20
... http://www.ora.com/ <HTML> <HEAD> <LINK REV=MADE HREF="mailto:webmaster@ora.com"> <TITLE>O'Reilly & Associates</TITLE> </HEAD> <BODY bgcolor=#ffffff> ... HTTP::Request 'PUT', 'http://www.ora.com/example/hi.text'; $request->header('content-length' => 2); $request->header('conte...
Ngày tải lên: 24/10/2013, 08:15
... example: use HTML::Parse; $html='<img "dot.gif"> <img src="dot2.gif">'; $tree=HTML::Parse::parse_html($html); $link_ref = $tree->extract_links( ); @link ... format, UNIX "ls -l", and Windows "dir", among others. When a time zone is not implicit in the $response->header('content-type' => 'text/plain&ap...
Ngày tải lên: 24/10/2013, 08:15
Web Client Programming with Perl-Chapter 6: Example LWP Programs-P1
... $self->{'url'}- >query("trk_num=$track_num&dest_cntry=" . "$country&ship_date=$date"); my $request = new HTTP::Request 'GET', $self- >{'url'}; ... $self->{'url'} = new URI::URL $cgi_url; $self->{'robot'} = new LWP: :RobotUA $user_agent_name, $email; $self->{'robot'}->dela...
Ngày tải lên: 28/10/2013, 15:15
Web Client Programming with Perl-Chapter 6: Example LWP Programs-P2
... $self->{'bad'} }; undef %{ $self->{'not_web'} }; undef %{ $self->{'local'} }; undef %{ $self->{'remote'} }; undef %{ $self->{'type'} ... refer to it. So if # url 'a' and 'b' refer to url 'c', then $self- >{'ref'}{'c'} # would have a value of 'a\nb\n'. The...
Ngày tải lên: 28/10/2013, 15:15
www.it-ebooks.info.www.it-ebooks.info.Developing Web Applications with Perl, memcached, MySQL® and ApacheForeword . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . xxv Intr potx
... 564 Chapter 13: mod _perl 565 New mod _perl 2.0 Features 566 Configuring mod _perl 566 mod _perl Configuration Directives 569 < ;Perl& gt; Sections 569 PerlModule 570 PerlLoadModule 571 SetHandler perl- script ... 571 SetHandler modperl 571 PerlSetEnv 571 PerlPassEnv 572 PerlSetVar 572 PerlAddVar 572 PerlPostConfigRequire 573 PerlRequire 573 PerlOptions 573 PerlSwitches 574 POD 574 mod _p...
Ngày tải lên: 15/03/2014, 17:20
Perl Pocket Reference 5th edition potx
... inserted: B<text> Bold text (for switches and programs). C<code> Literal code. E<esc> A named character, e.g., E<lt> means a < and E<gt> means a >. F<file> ... spaces. X<idx> An index entry. Z< > A zero-width character. Markup sequences may be nested. If a markup sequence has to contain > characters, use C<< . . . >> or C<...
Ngày tải lên: 23/03/2014, 00:20
Perl and XML potx
... <personnel-record> <name> <first>Rita</first> <last>Book</last> </name> <birthday> <year>1969</year> <month>4</month> ... <surname>WRIGLEY</surname> <age>42</age> </customer> Perl and XML p age 7 <customer> <address> <state>NY</state> &l...
Ngày tải lên: 23/03/2014, 00:20
BEGINNING Perl pot
... WHAT IS PERL? 1 Perl Today 2 Getting Perl 3 Working with Non-Windows Platforms: perlbrew 4 Using Windows 6 The Perl Community 8 IRC 8 PerlMonks 9 Perl Mongers 9 StackOverfl ow 9 Using perldoc ... warnings; %MyCompany::Stuff::department_number_for = ( finance => 13, programming => 2, janitorial => 17, executive => 0, ); And later, other code can reference this with the...
Ngày tải lên: 29/03/2014, 02:20