This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
allow evals to see the full lexical scope
[perl5.git] / pod / perlfaq.pod
1 =head1 NAME
2
3 perlfaq - frequently asked questions about Perl ($Date: 2002/11/13 06:23:50 $)
4
5 =head1 DESCRIPTION
6
7 The perlfaq is structured into the following documents:
8
9
10 =head2 perlfaq: Structural overview of the FAQ.
11
12 This document.
13
14 =head2 L<perlfaq1>: General Questions About Perl
15
16 Very general, high-level questions about Perl.
17
18 =over 4
19
20 =item *
21
22 What is Perl?
23
24 =item *
25
26 Who supports Perl?  Who develops it?  Why is it free?
27
28 =item *
29
30 Which version of Perl should I use?
31
32 =item *
33
34 What are perl4 and perl5?
35
36 =item *
37
38 What is perl6?
39
40 =item *
41
42 How stable is Perl?
43
44 =item *
45
46 Is Perl difficult to learn?
47
48 =item *
49
50 How does Perl compare with other languages like Java, Python, REXX, Scheme, or Tcl?
51
52 =item *
53
54 Can I do [task] in Perl?
55
56 =item *
57
58 When shouldn't I program in Perl?
59
60 =item *
61
62 What's the difference between "perl" and "Perl"?
63
64 =item *
65
66 Is it a Perl program or a Perl script?
67
68 =item *
69
70 What is a JAPH?
71
72 =item *
73
74 Where can I get a list of Larry Wall witticisms?
75
76 =item *
77
78 How can I convince my sysadmin/supervisor/employees to use version 5/5.6.1/Perl instead of some other language?
79
80 =back
81
82
83 =head2 L<perlfaq2>: Obtaining and Learning about Perl
84
85 Where to find source and documentation for Perl, support,
86 and related matters.
87
88 =over 4
89
90 =item *
91
92 What machines support Perl?  Where do I get it?
93
94 =item *
95
96 How can I get a binary version of Perl?
97
98 =item *
99
100 I don't have a C compiler on my system.  How can I compile perl?
101
102 =item *
103
104 I copied the Perl binary from one machine to another, but scripts don't work.
105
106 =item *
107
108 I grabbed the sources and tried to compile but gdbm/dynamic loading/malloc/linking/... failed.  How do I make it work?
109
110 =item *
111
112 What modules and extensions are available for Perl?  What is CPAN?  What does CPAN/src/... mean?
113
114 =item *
115
116 Is there an ISO or ANSI certified version of Perl?
117
118 =item *
119
120 Where can I get information on Perl?
121
122 =item *
123
124 What are the Perl newsgroups on Usenet?  Where do I post questions?
125
126 =item *
127
128 Where should I post source code?
129
130 =item *
131
132 Perl Books
133
134 =item *
135
136 Perl in Magazines
137
138 =item *
139
140 Perl on the Net: FTP and WWW Access
141
142 =item *
143
144 What mailing lists are there for Perl?
145
146 =item *
147
148 Archives of comp.lang.perl.misc
149
150 =item *
151
152 Where can I buy a commercial version of Perl?
153
154 =item *
155
156 Where do I send bug reports?
157
158 =item *
159
160 What is perl.com? Perl Mongers? pm.org? perl.org? cpan.org?
161
162 =back
163
164
165 =head2 L<perlfaq3>: Programming Tools
166
167 Programmer tools and programming support.
168
169 =over 4
170
171 =item *
172
173 How do I do (anything)?
174
175 =item *
176
177 How can I use Perl interactively?
178
179 =item *
180
181 Is there a Perl shell?
182
183 =item *
184
185 How do I find which modules are installed on my system?
186
187 =item *
188
189 How do I debug my Perl programs?
190
191 =item *
192
193 How do I profile my Perl programs?
194
195 =item *
196
197 How do I cross-reference my Perl programs?
198
199 =item *
200
201 Is there a pretty-printer (formatter) for Perl?
202
203 =item *
204
205 Is there a ctags for Perl?
206
207 =item *
208
209 Is there an IDE or Windows Perl Editor?
210
211 =item *
212
213 Where can I get Perl macros for vi?
214
215 =item *
216
217 Where can I get perl-mode for emacs?
218
219 =item *
220
221 How can I use curses with Perl?
222
223 =item *
224
225 How can I use X or Tk with Perl?
226
227 =item *
228
229 How can I generate simple menus without using CGI or Tk?
230
231 =item *
232
233 How can I make my Perl program run faster?
234
235 =item *
236
237 How can I make my Perl program take less memory?
238
239 =item *
240
241 Is it safe to return a reference to local or lexical data?
242
243 =item *
244
245 How can I free an array or hash so my program shrinks?
246
247 =item *
248
249 How can I make my CGI script more efficient?
250
251 =item *
252
253 How can I hide the source for my Perl program?
254
255 =item *
256
257 How can I compile my Perl program into byte code or C?
258
259 =item *
260
261 How can I compile Perl into Java?
262
263 =item *
264
265 How can I get C<#!perl> to work on [MS-DOS,NT,...]?
266
267 =item *
268
269 Can I write useful Perl programs on the command line?
270
271 =item *
272
273 Why don't Perl one-liners work on my DOS/Mac/VMS system?
274
275 =item *
276
277 Where can I learn about CGI or Web programming in Perl?
278
279 =item *
280
281 Where can I learn about object-oriented Perl programming?
282
283 =item *
284
285 Where can I learn about linking C with Perl? [h2xs, xsubpp]
286
287 =item *
288
289 I've read perlembed, perlguts, etc., but I can't embed perl in
290 my C program; what am I doing wrong?
291
292 =item *
293
294 When I tried to run my script, I got this message. What does it mean?
295
296 =item *
297
298 What's MakeMaker?
299
300 =back
301
302
303 =head2 L<perlfaq4>: Data Manipulation
304
305 Manipulating numbers, dates, strings, arrays, hashes, and
306 miscellaneous data issues.
307
308 =over 4
309
310 =item *
311
312 Why am I getting long decimals (eg, 19.9499999999999) instead of the numbers I should be getting (eg, 19.95)?
313
314 =item *
315
316 Why isn't my octal data interpreted correctly?
317
318 =item *
319
320 Does Perl have a round() function?  What about ceil() and floor()?  Trig functions?
321
322 =item *
323
324 How do I convert between numeric representations?
325
326 =item *
327
328 Why doesn't & work the way I want it to?
329
330 =item *
331
332 How do I multiply matrices?
333
334 =item *
335
336 How do I perform an operation on a series of integers?
337
338 =item *
339
340 How can I output Roman numerals?
341
342 =item *
343
344 Why aren't my random numbers random?
345
346 =item *
347
348 How do I get a random number between X and Y?
349
350 =item *
351
352 How do I find the week-of-the-year/day-of-the-year?
353
354 =item *
355
356 How do I find the current century or millennium?
357
358 =item *
359
360 How can I compare two dates and find the difference?
361
362 =item *
363
364 How can I take a string and turn it into epoch seconds?
365
366 =item *
367
368 How can I find the Julian Day?
369
370 =item *
371
372 How do I find yesterday's date?
373
374 =item *
375
376 Does Perl have a Year 2000 problem?  Is Perl Y2K compliant?
377
378 =item *
379
380 How do I validate input?
381
382 =item *
383
384 How do I unescape a string?
385
386 =item *
387
388 How do I remove consecutive pairs of characters?
389
390 =item *
391
392 How do I expand function calls in a string?
393
394 =item *
395
396 How do I find matching/nesting anything?
397
398 =item *
399
400 How do I reverse a string?
401
402 =item *
403
404 How do I expand tabs in a string?
405
406 =item *
407
408 How do I reformat a paragraph?
409
410 =item *
411
412 How can I access or change N characters of a string?
413
414 =item *
415
416 How do I change the Nth occurrence of something?
417
418 =item *
419
420 How can I count the number of occurrences of a substring within a string?
421
422 =item *
423
424 How do I capitalize all the words on one line?
425
426 =item *
427
428 How can I split a [character] delimited string except when inside [character]?
429
430 =item *
431
432 How do I strip blank space from the beginning/end of a string?
433
434 =item *
435
436 How do I pad a string with blanks or pad a number with zeroes?
437
438 =item *
439
440 How do I extract selected columns from a string?
441
442 =item *
443
444 How do I find the soundex value of a string?
445
446 =item *
447
448 How can I expand variables in text strings?
449
450 =item *
451
452 What's wrong with always quoting "$vars"?
453
454 =item *
455
456 Why don't my <<HERE documents work?
457
458 =item *
459
460 What is the difference between a list and an array?
461
462 =item *
463
464 What is the difference between $array[1] and @array[1]?
465
466 =item *
467
468 How can I remove duplicate elements from a list or array?
469
470 =item *
471
472 How can I tell whether a certain element is contained in a list or array?
473
474 =item *
475
476 How do I compute the difference of two arrays?  How do I compute the intersection of two arrays?
477
478 =item *
479
480 How do I test whether two arrays or hashes are equal?
481
482 =item *
483
484 How do I find the first array element for which a condition is true?
485
486 =item *
487
488 How do I handle linked lists?
489
490 =item *
491
492 How do I handle circular lists?
493
494 =item *
495
496 How do I shuffle an array randomly?
497
498 =item *
499
500 How do I process/modify each element of an array?
501
502 =item *
503
504 How do I select a random element from an array?
505
506 =item *
507
508 How do I permute N elements of a list?
509
510 =item *
511
512 How do I sort an array by (anything)?
513
514 =item *
515
516 How do I manipulate arrays of bits?
517
518 =item *
519
520 Why does defined() return true on empty arrays and hashes?
521
522 =item *
523
524 How do I process an entire hash?
525
526 =item *
527
528 What happens if I add or remove keys from a hash while iterating over it?
529
530 =item *
531
532 How do I look up a hash element by value?
533
534 =item *
535
536 How can I know how many entries are in a hash?
537
538 =item *
539
540 How do I sort a hash (optionally by value instead of key)?
541
542 =item *
543
544 How can I always keep my hash sorted?
545
546 =item *
547
548 What's the difference between "delete" and "undef" with hashes?
549
550 =item *
551
552 Why don't my tied hashes make the defined/exists distinction?
553
554 =item *
555
556 How do I reset an each() operation part-way through?
557
558 =item *
559
560 How can I get the unique keys from two hashes?
561
562 =item *
563
564 How can I store a multidimensional array in a DBM file?
565
566 =item *
567
568 How can I make my hash remember the order I put elements into it?
569
570 =item *
571
572 Why does passing a subroutine an undefined element in a hash create it?
573
574 =item *
575
576 How can I make the Perl equivalent of a C structure/C++ class/hash or array of hashes or arrays?
577
578 =item *
579
580 How can I use a reference as a hash key?
581
582 =item *
583
584 How do I handle binary data correctly?
585
586 =item *
587
588 How do I determine whether a scalar is a number/whole/integer/float?
589
590 =item *
591
592 How do I keep persistent data across program calls?
593
594 =item *
595
596 How do I print out or copy a recursive data structure?
597
598 =item *
599
600 How do I define methods for every class/object?
601
602 =item *
603
604 How do I verify a credit card checksum?
605
606 =item *
607
608 How do I pack arrays of doubles or floats for XS code?
609
610 =back
611
612
613 =head2 L<perlfaq5>: Files and Formats
614
615 I/O and the "f" issues: filehandles, flushing, formats, and footers.
616
617 =over 4
618
619 =item *
620
621 How do I flush/unbuffer an output filehandle?  Why must I do this?
622
623 =item *
624
625 How do I change one line in a file/delete a line in a file/insert a line in the middle of a file/append to the beginning of a file?
626
627 =item *
628
629 How do I count the number of lines in a file?
630
631 =item *
632
633 How can I use Perl's C<-i> option from within a program?
634
635 =item *
636
637 How do I make a temporary file name?
638
639 =item *
640
641 How can I manipulate fixed-record-length files?
642
643 =item *
644
645 How can I make a filehandle local to a subroutine?  How do I pass filehandles between subroutines?  How do I make an array of filehandles?
646
647 =item *
648
649 How can I use a filehandle indirectly?
650
651 =item *
652
653 How can I set up a footer format to be used with write()?
654
655 =item *
656
657 How can I write() into a string?
658
659 =item *
660
661 How can I output my numbers with commas added?
662
663 =item *
664
665 How can I translate tildes (~) in a filename?
666
667 =item *
668
669 How come when I open a file read-write it wipes it out?
670
671 =item *
672
673 Why do I sometimes get an "Argument list too long" when I use <*>?
674
675 =item *
676
677 Is there a leak/bug in glob()?
678
679 =item *
680
681 How can I open a file with a leading ">" or trailing blanks?
682
683 =item *
684
685 How can I reliably rename a file?
686
687 =item *
688
689 How can I lock a file?
690
691 =item *
692
693 Why can't I just open(FH, ">file.lock")?
694
695 =item *
696
697 I still don't get locking.  I just want to increment the number in the file.  How can I do this?
698
699 =item *
700
701 All I want to do is append a small amount of text to the end of a file.  Do I still have to use locking?
702
703 =item *
704
705 How do I randomly update a binary file?
706
707 =item *
708
709 How do I get a file's timestamp in perl?
710
711 =item *
712
713 How do I set a file's timestamp in perl?
714
715 =item *
716
717 How do I print to more than one file at once?
718
719 =item *
720
721 How can I read in an entire file all at once?
722
723 =item *
724
725 How can I read in a file by paragraphs?
726
727 =item *
728
729 How can I read a single character from a file?  From the keyboard?
730
731 =item *
732
733 How can I tell whether there's a character waiting on a filehandle?
734
735 =item *
736
737 How do I do a C<tail -f> in perl?
738
739 =item *
740
741 How do I dup() a filehandle in Perl?
742
743 =item *
744
745 How do I close a file descriptor by number?
746
747 =item *
748
749 Why can't I use "C:\temp\foo" in DOS paths?  What doesn't `C:\temp\foo.exe` work?
750
751 =item *
752
753 Why doesn't glob("*.*") get all the files?
754
755 =item *
756
757 Why does Perl let me delete read-only files?  Why does C<-i> clobber protected files?  Isn't this a bug in Perl?
758
759 =item *
760
761 How do I select a random line from a file?
762
763 =item *
764
765 Why do I get weird spaces when I print an array of lines?
766
767 =back
768
769
770 =head2 L<perlfaq6>: Regular Expressions
771
772 Pattern matching and regular expressions.
773
774 =over 4
775
776 =item *
777
778 How can I hope to use regular expressions without creating illegible and unmaintainable code?
779
780 =item *
781
782 I'm having trouble matching over more than one line.  What's wrong?
783
784 =item *
785
786 How can I pull out lines between two patterns that are themselves on different lines?
787
788 =item *
789
790 I put a regular expression into $/ but it didn't work. What's wrong?
791
792 =item *
793
794 How do I substitute case insensitively on the LHS while preserving case on the RHS?
795
796 =item *
797
798 How can I make C<\w> match national character sets?
799
800 =item *
801
802 How can I match a locale-smart version of C</[a-zA-Z]/>?
803
804 =item *
805
806 How can I quote a variable to use in a regex?
807
808 =item *
809
810 What is C</o> really for?
811
812 =item *
813
814 How do I use a regular expression to strip C style comments from a file?
815
816 =item *
817
818 Can I use Perl regular expressions to match balanced text?
819
820 =item *
821
822 What does it mean that regexes are greedy?  How can I get around it?
823
824 =item *
825
826 How do I process each word on each line?
827
828 =item *
829
830 How can I print out a word-frequency or line-frequency summary?
831
832 =item *
833
834 How can I do approximate matching?
835
836 =item *
837
838 How do I efficiently match many regular expressions at once?
839
840 =item *
841
842 Why don't word-boundary searches with C<\b> work for me?
843
844 =item *
845
846 Why does using $&, $`, or $' slow my program down?
847
848 =item *
849
850 What good is C<\G> in a regular expression?
851
852 =item *
853
854 Are Perl regexes DFAs or NFAs?  Are they POSIX compliant?
855
856 =item *
857
858 What's wrong with using grep or map in a void context?
859
860 =item *
861
862 How can I match strings with multibyte characters?
863
864 =item *
865
866 How do I match a pattern that is supplied by the user?
867
868 =back
869
870
871 =head2 L<perlfaq7>: General Perl Language Issues
872
873 General Perl language issues that don't clearly fit into any of the
874 other sections.
875
876 =over 4
877
878 =item *
879
880 Can I get a BNF/yacc/RE for the Perl language?
881
882 =item *
883
884 What are all these $@%&* punctuation signs, and how do I know when to use them?
885
886 =item *
887
888 Do I always/never have to quote my strings or use semicolons and commas?
889
890 =item *
891
892 How do I skip some return values?
893
894 =item *
895
896 How do I temporarily block warnings?
897
898 =item *
899
900 What's an extension?
901
902 =item *
903
904 Why do Perl operators have different precedence than C operators?
905
906 =item *
907
908 How do I declare/create a structure?
909
910 =item *
911
912 How do I create a module?
913
914 =item *
915
916 How do I create a class?
917
918 =item *
919
920 How can I tell if a variable is tainted?
921
922 =item *
923
924 What's a closure?
925
926 =item *
927
928 What is variable suicide and how can I prevent it?
929
930 =item *
931
932 How can I pass/return a {Function, FileHandle, Array, Hash, Method, Regex}?
933
934 =item *
935
936 How do I create a static variable?
937
938 =item *
939
940 What's the difference between dynamic and lexical (static) scoping?  Between local() and my()?
941
942 =item *
943
944 How can I access a dynamic variable while a similarly named lexical is in scope?
945
946 =item *
947
948 What's the difference between deep and shallow binding?
949
950 =item *
951
952 Why doesn't "my($foo) = <FILE>;" work right?
953
954 =item *
955
956 How do I redefine a builtin function, operator, or method?
957
958 =item *
959
960 What's the difference between calling a function as &foo and foo()?
961
962 =item *
963
964 How do I create a switch or case statement?
965
966 =item *
967
968 How can I catch accesses to undefined variables, functions, or methods?
969
970 =item *
971
972 Why can't a method included in this same file be found?
973
974 =item *
975
976 How can I find out my current package?
977
978 =item *
979
980 How can I comment out a large block of perl code?
981
982 =item *
983
984 How do I clear a package?
985
986 =item *
987
988 How can I use a variable as a variable name?
989
990 =back
991
992
993 =head2 L<perlfaq8>: System Interaction
994
995 Interprocess communication (IPC), control over the user-interface
996 (keyboard, screen and pointing devices).
997
998 =over 4
999
1000 =item *
1001
1002 How do I find out which operating system I'm running under?
1003
1004 =item *
1005
1006 How come exec() doesn't return?
1007
1008 =item *
1009
1010 How do I do fancy stuff with the keyboard/screen/mouse?
1011
1012 =item *
1013
1014 How do I print something out in color?
1015
1016 =item *
1017
1018 How do I read just one key without waiting for a return key?
1019
1020 =item *
1021
1022 How do I check whether input is ready on the keyboard?
1023
1024 =item *
1025
1026 How do I clear the screen?
1027
1028 =item *
1029
1030 How do I get the screen size?
1031
1032 =item *
1033
1034 How do I ask the user for a password?
1035
1036 =item *
1037
1038 How do I read and write the serial port?
1039
1040 =item *
1041
1042 How do I decode encrypted password files?
1043
1044 =item *
1045
1046 How do I start a process in the background?
1047
1048 =item *
1049
1050 How do I trap control characters/signals?
1051
1052 =item *
1053
1054 How do I modify the shadow password file on a Unix system?
1055
1056 =item *
1057
1058 How do I set the time and date?
1059
1060 =item *
1061
1062 How can I sleep() or alarm() for under a second?
1063
1064 =item *
1065
1066 How can I measure time under a second?
1067
1068 =item *
1069
1070 How can I do an atexit() or setjmp()/longjmp()? (Exception handling)
1071
1072 =item *
1073
1074 Why doesn't my sockets program work under System V (Solaris)?  What does the error message "Protocol not supported" mean?
1075
1076 =item *
1077
1078 How can I call my system's unique C functions from Perl?
1079
1080 =item *
1081
1082 Where do I get the include files to do ioctl() or syscall()?
1083
1084 =item *
1085
1086 Why do setuid perl scripts complain about kernel problems?
1087
1088 =item *
1089
1090 How can I open a pipe both to and from a command?
1091
1092 =item *
1093
1094 Why can't I get the output of a command with system()?
1095
1096 =item *
1097
1098 How can I capture STDERR from an external command?
1099
1100 =item *
1101
1102 Why doesn't open() return an error when a pipe open fails?
1103
1104 =item *
1105
1106 What's wrong with using backticks in a void context?
1107
1108 =item *
1109
1110 How can I call backticks without shell processing?
1111
1112 =item *
1113
1114 Why can't my script read from STDIN after I gave it EOF (^D on Unix, ^Z on MS-DOS)?
1115
1116 =item *
1117
1118 How can I convert my shell script to perl?
1119
1120 =item *
1121
1122 Can I use perl to run a telnet or ftp session?
1123
1124 =item *
1125
1126 How can I write expect in Perl?
1127
1128 =item *
1129
1130 Is there a way to hide perl's command line from programs such as "ps"?
1131
1132 =item *
1133
1134 I {changed directory, modified my environment} in a perl script.  How come the change disappeared when I exited the script?  How do I get my changes to be visible?
1135
1136 =item *
1137
1138 How do I close a process's filehandle without waiting for it to complete?
1139
1140 =item *
1141
1142 How do I fork a daemon process?
1143
1144 =item *
1145
1146 How do I find out if I'm running interactively or not?
1147
1148 =item *
1149
1150 How do I timeout a slow event?
1151
1152 =item *
1153
1154 How do I set CPU limits?
1155
1156 =item *
1157
1158 How do I avoid zombies on a Unix system?
1159
1160 =item *
1161
1162 How do I use an SQL database?
1163
1164 =item *
1165
1166 How do I make a system() exit on control-C?
1167
1168 =item *
1169
1170 How do I open a file without blocking?
1171
1172 =item *
1173
1174 How do I install a module from CPAN?
1175
1176 =item *
1177
1178 What's the difference between require and use?
1179
1180 =item *
1181
1182 How do I keep my own module/library directory?
1183
1184 =item *
1185
1186 How do I add the directory my program lives in to the module/library search path?
1187
1188 =item *
1189
1190 How do I add a directory to my include path at runtime?
1191
1192 =item *
1193
1194 What is socket.ph and where do I get it?
1195
1196 =back
1197
1198
1199 =head2 L<perlfaq9>: Networking
1200
1201 Networking, the internet, and a few on the web.
1202
1203 =over 4
1204
1205 =item *
1206
1207 What is the correct form of response from a CGI script?
1208
1209 =item *
1210
1211 My CGI script runs from the command line but not the browser.  (500 Server Error)
1212
1213 =item *
1214
1215 How can I get better error messages from a CGI program?
1216
1217 =item *
1218
1219 How do I remove HTML from a string?
1220
1221 =item *
1222
1223 How do I extract URLs?
1224
1225 =item *
1226
1227 How do I download a file from the user's machine?  How do I open a file on another machine?
1228
1229 =item *
1230
1231 How do I make a pop-up menu in HTML?
1232
1233 =item *
1234
1235 How do I fetch an HTML file?
1236
1237 =item *
1238
1239 How do I automate an HTML form submission?
1240
1241 =item *
1242
1243 How do I decode or create those %-encodings on the web?
1244
1245 =item *
1246
1247 How do I redirect to another page?
1248
1249 =item *
1250
1251 How do I put a password on my web pages?
1252
1253 =item *
1254
1255 How do I edit my .htpasswd and .htgroup files with Perl?
1256
1257 =item *
1258
1259 How do I make sure users can't enter values into a form that cause my CGI script to do bad things?
1260
1261 =item *
1262
1263 How do I parse a mail header?
1264
1265 =item *
1266
1267 How do I decode a CGI form?
1268
1269 =item *
1270
1271 How do I check a valid mail address?
1272
1273 =item *
1274
1275 How do I decode a MIME/BASE64 string?
1276
1277 =item *
1278
1279 How do I return the user's mail address?
1280
1281 =item *
1282
1283 How do I send mail?
1284
1285 =item *
1286
1287 How do I use MIME to make an attachment to a mail message?
1288
1289 =item *
1290
1291 How do I read mail?
1292
1293 =item *
1294
1295 How do I find out my hostname/domainname/IP address?
1296
1297 =item *
1298
1299 How do I fetch a news article or the active newsgroups?
1300
1301 =item *
1302
1303 How do I fetch/put an FTP file?
1304
1305 =item *
1306
1307 How can I do RPC in Perl?
1308
1309 =back
1310
1311
1312 =head1 About the perlfaq documents
1313
1314 =head2 Where to get the perlfaq
1315
1316 This document is posted regularly to comp.lang.perl.announce and
1317 several other related newsgroups.  It is available on many
1318 web sites: http://www.perldoc.com/ and http://perlfaq.cpan.org/ .
1319
1320 =head2 How to contribute to the perlfaq
1321
1322 You may mail corrections, additions, and suggestions to
1323 perlfaq-workers@perl.org .  This alias should not be 
1324 used to I<ask> FAQs.  It's for fixing the current FAQ.
1325 Send questions to the comp.lang.perl.misc newsgroup.
1326
1327 =head2 What will happen if you mail your Perl programming problems to the authors
1328
1329 Your questions will probably go unread, unless they're suggestions of
1330 new questions to add to the FAQ, in which case they should have gone
1331 to the perlfaq-workers@perl.org instead.
1332
1333 You should have read section 2 of this faq.  There you would have
1334 learned that comp.lang.perl.misc is the appropriate place to go for
1335 free advice.  If your question is really important and you require a
1336 prompt and correct answer, you should hire a consultant.
1337
1338 =head1 Credits
1339
1340 When I first began the Perl FAQ in the late 80s, I never realized it
1341 would have grown to over a hundred pages, nor that Perl would ever become
1342 so popular and widespread.  This document could not have been written
1343 without the tremendous help provided by Larry Wall and the rest of the
1344 Perl Porters.
1345
1346 =head1 Author and Copyright Information
1347
1348 Copyright (c) 1997-2002 Tom Christiansen and Nathan Torkington.
1349 All rights reserved.
1350
1351 =head2 Bundled Distributions
1352
1353 This documentation is free; you can redistribute it and/or modify it
1354 under the same terms as Perl itself.
1355
1356 Irrespective of its distribution, all code examples in these files
1357 are hereby placed into the public domain.  You are permitted and
1358 encouraged to use this code in your own programs for fun
1359 or for profit as you see fit.  A simple comment in the code giving
1360 credit would be courteous but is not required.
1361
1362 =head2 Disclaimer
1363
1364 This information is offered in good faith and in the hope that it may
1365 be of use, but is not guaranteed to be correct, up to date, or suitable
1366 for any particular purpose whatsoever.  The authors accept no liability
1367 in respect of this information or its use.
1368
1369 =back