Beginning Web Development With Perl : From Novice to ... - Nabo

More documents

Recommendations

Info

218CHAPTER 11 ■ DEVELOPMENT WITH MOD_PERLEach of the class methods of Apache::Table has its own set of methods, including the following:• add()• clear()• do()• get()• merge()• new()• set()• unset()Since name=value pairs are sent from the headers_in() method, the output naturally lendsitself to being represented in a hash. Listing 11-9 (Headersin.cgi) prints the output from theheaders_in() method.Listing 11-9. The headers_in() Method to See Name=Value Pairsuse strict;my $r = shift;$r->send_http_header('text/plain');my %headers = $r->headers_in();foreach my $header (keys %headers) {print "$header = $headers{$header}\n";}The output is shown in Figure 11-13.
CHAPTER 11 ■ DEVELOPMENT WITH MOD_PERL 219Figure 11-13. The headers for a request retrieved using the headers_in() methodYou could access individual headers by calling them within the hash. For example,Listing 11-10 (Printuseragent.cgi) shows the code to see the user agent used for the request.Listing 11-10. Looking at the User Agentuse strict;my $r = shift;$r->send_http_header('text/plain');my %headers = $r->headers_in();print "The User-Agent is: $headers{'User-Agent'}\n";The output from this program is shown in Figure 11-14.
Page 3 and 4:
Beginning Web Development with Perl
Page 5 and 6:
PART 5 ■ ■ ■ Creating Web Tem
Page 8 and 9:
■CONTENTSvii■CHAPTER 4 System I
Page 10 and 11:
■CONTENTSixCreating a SOAP Listen
Page 12 and 13:
■CONTENTSxiTemplate Toolkit Synta
Page 14 and 15:
About the Author■STEVE SUEHRING i
Page 16 and 17:
AcknowledgmentsThanks to James Lee
Page 18 and 19:
xx■INTRODUCTIONThis book will use
Page 20 and 21:
CHAPTER 1■ ■ ■The CGI ModuleT
Page 22 and 23:
CHAPTER 1 ■ THE CGI MODULE 5for t
Page 24 and 25:
CHAPTER 1 ■ THE CGI MODULE 7Obvio
Page 26 and 27:
CHAPTER 1 ■ THE CGI MODULE 9exit;
Page 28 and 29:
CHAPTER 1 ■ THE CGI MODULE 11Each
Page 30 and 31:
CHAPTER 1 ■ THE CGI MODULE 13When
Page 32 and 33:
CHAPTER 1 ■ THE CGI MODULE 15Upda
Page 34 and 35:
CHAPTER 1 ■ THE CGI MODULE 17rese
Page 36 and 37:
CHAPTER 1 ■ THE CGI MODULE 19prin
Page 38 and 39:
CHAPTER 1 ■ THE CGI MODULE 21Sett
Page 40 and 41:
CHAPTER 1 ■ THE CGI MODULE 23You
Page 42 and 43:
CHAPTER 1 ■ THE CGI MODULE 25■C
Page 44 and 45:
CHAPTER 1 ■ THE CGI MODULE 27No m
Page 46 and 47:
CHAPTER 1 ■ THE CGI MODULE 29The
Page 48 and 49:
CHAPTER 1 ■ THE CGI MODULE 31prin
Page 50 and 51:
CHAPTER 1 ■ THE CGI MODULE 33Also
Page 52 and 53:
CHAPTER 2■ ■ ■Popular CGI Mod
Page 54 and 55:
CHAPTER 2 ■ POPULAR CGI MODULES 3
Page 56 and 57:
Page 58 and 59:
Page 60 and 61:
Page 62 and 63:
Page 64 and 65:
Page 66 and 67:
50CHAPTER 3 ■ DATABASES AND PERLT
Page 68 and 69:
52CHAPTER 3 ■ DATABASES AND PERLm
Page 70 and 71:
54CHAPTER 3 ■ DATABASES AND PERLl
Page 72 and 73:
56CHAPTER 3 ■ DATABASES AND PERLc
Page 74 and 75:
58CHAPTER 3 ■ DATABASES AND PERLR
Page 76 and 77:
Page 78 and 79:
62CHAPTER 3 ■ DATABASES AND PERLw
Page 80 and 81:
64CHAPTER 3 ■ DATABASES AND PERLA
Page 82 and 83:
Page 84 and 85:
Page 86 and 87:
Page 88 and 89:
Page 90 and 91:
74CHAPTER 4 ■ SYSTEM INTERACTION
Page 92 and 93:
76CHAPTER 4 ■ SYSTEM INTERACTIONt
Page 94 and 95:
78CHAPTER 4 ■ SYSTEM INTERACTIONc
Page 96 and 97:
80CHAPTER 4 ■ SYSTEM INTERACTIONA
Page 98 and 99:
82CHAPTER 4 ■ SYSTEM INTERACTIONm
Page 100 and 101:
84CHAPTER 4 ■ SYSTEM INTERACTIONs
Page 102 and 103:
86CHAPTER 4 ■ SYSTEM INTERACTIONr
Page 104 and 105:
CHAPTER 5■ ■ ■LWP ModulesLWP
Page 106 and 107:
CHAPTER 5 ■ LWP MODULES 91HTTP Re
Page 108 and 109:
CHAPTER 5 ■ LWP MODULES 93Get Fun
Page 110 and 111:
CHAPTER 5 ■ LWP MODULES 95When ca
Page 112 and 113:
CHAPTER 5 ■ LWP MODULES 97These a
Page 114 and 115:
CHAPTER 5 ■ LWP MODULES 99Recall
Page 116 and 117:
CHAPTER 5 ■ LWP MODULES 101which
Page 118 and 119:
CHAPTER 5 ■ LWP MODULES 103For th
Page 120 and 121:
CHAPTER 5 ■ LWP MODULES 105Obviou
Page 122 and 123:
108CHAPTER 6 ■ NET:: TOOLSCreatin
Page 124 and 125:
110CHAPTER 6 ■ NET:: TOOLSThe out
Page 126 and 127:
112CHAPTER 6 ■ NET:: TOOLSmy $pop
Page 128 and 129:
114CHAPTER 6 ■ NET:: TOOLSthe POP
Page 130 and 131:
116CHAPTER 6 ■ NET:: TOOLS($messa
Page 132 and 133:
118CHAPTER 6 ■ NET:: TOOLSListing
Page 134 and 135:
120CHAPTER 6 ■ NET:: TOOLSFor the
Page 136 and 137:
122CHAPTER 6 ■ NET:: TOOLSNet::SM
Page 138 and 139:
124CHAPTER 6 ■ NET:: TOOLS$smtpco
Page 140 and 141:
126CHAPTER 6 ■ NET:: TOOLSuse Net
Page 142 and 143:
128CHAPTER 6 ■ NET:: TOOLSListing
Page 144 and 145:
130CHAPTER 6 ■ NET:: TOOLSFor exa
Page 146 and 147:
132CHAPTER 6 ■ NET:: TOOLSSending
Page 148 and 149:
PART 3■ ■ ■XML and RSS
Page 150 and 151:
138CHAPTER 7 ■ SOAP-BASED WEB SER
Page 152 and 153:
Page 154 and 155:
Page 156 and 157:
Page 158 and 159:
Page 160 and 161:
Page 162 and 163:
Page 164 and 165:
Page 166 and 167:
154CHAPTER 8 ■ PERL AND RSSFigure
Page 168 and 169:
156CHAPTER 8 ■ PERL AND RSShttp:/
Page 170 and 171:
158CHAPTER 8 ■ PERL AND RSSDebugg
Page 172 and 173:
160CHAPTER 8 ■ PERL AND RSS$rsswr
Page 174 and 175:
162CHAPTER 8 ■ PERL AND RSSListin
Page 176 and 177:
CHAPTER 9■ ■ ■XML Parsing wit
Page 178 and 179: CHAPTER 9 ■ XML PARSING WITH PERL
Page 192 and 193: PART 4■ ■ ■PerformanceEnhance
Page 194 and 195: 184CHAPTER 10 ■ APACHE AND MOD_PE
Page 212 and 213: 202CHAPTER 11 ■ DEVELOPMENT WITH
Page 242 and 243: CHAPTER 12■ ■ ■The Template T
Page 244 and 245: CHAPTER 12 ■ THE TEMPLATE TOOLKIT
Page 272 and 273: CHAPTER 13■ ■ ■Perl Web Sites
Page 274 and 275: CHAPTER 13 ■ PERL WEB SITES WITH
Page 276 and 277: CHAPTER 13 ■ PERL WEB SITES WITH
Page 278 and 279:
CHAPTER 13 ■ PERL WEB SITES WITH
Page 280 and 281:
Page 282 and 283:
Page 284 and 285:
Page 286 and 287:
Page 288 and 289:
Page 290 and 291:
Page 292 and 293:
284APPENDIX ■ PERL BASICSKeywords
Page 294 and 295:
286APPENDIX ■ PERL BASICS$ perl n
Page 296 and 297:
288APPENDIX ■ PERL BASICSAnd line
Page 298 and 299:
290APPENDIX ■ PERL BASICSCan you
Page 300 and 301:
292APPENDIX ■ PERL BASICSBy defau
Page 302 and 303:
294APPENDIX ■ PERL BASICS#!/usr/b
Page 304 and 305:
296APPENDIX ■ PERL BASICSThe last
Page 306 and 307:
298APPENDIX ■ PERL BASICSThe NOT
Page 308 and 309:
300APPENDIX ■ PERL BASICSprint "S
Page 310 and 311:
302APPENDIX ■ PERL BASICSthe syst
Page 312 and 313:
304APPENDIX ■ PERL BASICS$ perl s
Page 314 and 315:
306APPENDIX ■ PERL BASICSThis cod
Page 316 and 317:
308APPENDIX ■ PERL BASICS$a = 6 *
Page 318 and 319:
310APPENDIX ■ PERL BASICS$a = "A9
Page 320 and 321:
312APPENDIX ■ PERL BASICS#!/usr/b
Page 322 and 323:
314APPENDIX ■ PERL BASICSmy $name
Page 324 and 325:
316APPENDIX ■ PERL BASICSis short
Page 326 and 327:
318APPENDIX ■ PERL BASICSLet’s
Page 328 and 329:
320APPENDIX ■ PERL BASICSOther Te
Page 330 and 331:
322APPENDIX ■ PERL BASICS}}}actio
Page 332 and 333:
324APPENDIX ■ PERL BASICSNotice t
Page 334 and 335:
326APPENDIX ■ PERL BASICSLooping
Page 336 and 337:
328APPENDIX ■ PERL BASICSuse stri
Page 338 and 339:
330APPENDIX ■ PERL BASICSuntil ($
Page 340 and 341:
332APPENDIX ■ PERL BASICSuse stri
Page 342 and 343:
334APPENDIX ■ PERL BASICSdoneAll
Page 344 and 345:
336APPENDIX ■ PERL BASICS$ perl r
Page 346 and 347:
338APPENDIX ■ PERL BASICSSummaryT
Page 348 and 349:
340■INDEXmethods for retrieving r
Page 350 and 351:
342■INDEXdo() method for, 62dumpi
Page 352 and 353:
344■INDEXhello option for Net::SM
Page 354 and 355:
346■INDEXNet::DNS module, 125-128
Page 356 and 357:
348■INDEXrecord with Net::DNS mod
Page 358 and 359:
350■INDEXstoring mail server in e
Page 360 and 361:
352■INDEXlogging based on, 229pri
show all

Beginning Web Development With Perl : From Novice to ... - Nabo

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?