jv@mh.nl (Johan Vromans) (01/18/91)
Submitted-by: jv@mh.nl
Archive-name: perlref3_44_0/part04
---- Cut Here and feed the following to sh ----
#!/bin/sh
# this is perlref_shr.04 (part 4 of perlref3_44_0)
# do not concatenate these parts, unpack them in order with /bin/sh
# file refbase.ps continued
#
if test ! -r _shar_seq_.tmp; then
echo 'Please unpack part 1 first!'
exit 1
fi
(read Scheck
if test "$Scheck" != 4; then
echo Please unpack part "$Scheck" next!
exit 1
else
exit 0
fi
) < _shar_seq_.tmp || exit 1
if test ! -f _shar_wnt_.tmp; then
echo 'x - still skipping refbase.ps'
else
echo 'x - continuing file refbase.ps'
sed 's/^X//' << 'SHAR_EOF' >> 'refbase.ps' &&
(\322caller\323 returns this info for the current subroutine, \322caller\(1\)\323 for the)show
187 197 gm
(caller of this subroutine etc..)show
204 169 gm
(defined\(EXPR\)*)show
218 197 gm
(Tests whether the lvalue EXPR has a real value.)show
235 169 gm
(dump [LABEL])show
249 197 gm
(Immediate core dump. When reincarnated, starts at LABEL.)show
266 169 gm
(local\(LIST\))show
280 197 gm
(Declares the listed variables to be local to the enclosing block,)show
294 197 gm
(subroutine or eval.)show
311 169 gm
(package NAME)show
325 197 gm
(Designates the remainder of the current block as a package.)show
342 169 gm
(require\(EXPR\240\)*)show
356 197 gm
(Includes the specified file from the perl library. Does not include more)show
370 197 gm
(than once, and yields a fatal error if the file does include OK.)show
387 169 gm
(reset [\(EXPR\)*])show
401 197 gm
(Resets ?? searches so that they work again. EXPR is a list of single)show
415 197 gm
(letters. All variables and arrays beginning with one of those letters are)show
429 197 gm
(reset to their pristine state. Only affects the current package.)show
446 169 gm
(scalar\(EXPR\))show
460 197 gm
(Forces evaluation of EXPR in scalar context.)show
477 169 gm
(sub NAME { EXPR; ... })show
491 197 gm
(Designates NAME as a subroutine. Parameters are passed by reference)show
505 197 gm
(as array @_ . Returns the value of the last expression evaluated.)show
522 169 gm
(undef[\(LVALUE\)*])show
536 197 gm
(Undefines the LVALUE. Always returns the undefined value.)show
553 169 gm
(wantarray)show
567 197 gm
(Returns true if the current context expects an array value.)show
604 169 gm
1 fs
18 fz
bu fc
2 F /|______Times-Bold fnt
bn
(21. Formats)show
624 197 gm
0 fs
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(format [NAME] =)show
638 197 gm
(FORMLIST)show
652 197 gm
(.)show
669 169 gm
(FORMLIST pictures the lines, and contains the arguments which will give)show
683 169 gm
(values to the fields in the lines. Picture fields are:)show
700 198 gm
(@<<<\311 left adjusted field, the \322<\323 is repeated to denote the length of)show
714 227 gm
(the field;)show
731 198 gm
(@>>>\311 right adjusted field;)show
748 198 gm
(@ | | | \311 centered field;)show
765 198 gm
(@###.##\311 numeric format with implied decimal point;)show
782 198 gm
(@* a multi-line field.)show
799 169 gm
(Use \322^\323 instead of \322@\323 for multi-line block filling.)show
816 169 gm
(Use \322~\323 at the beginning of a line to suppress unwanted empty lines.)show
833 169 gm
(Use \322~ ~\323 at the beginning of a line to have this format line repeated until all)show
847 197 gm
(fields are exhausted.)show
864 169 gm
(Set $\320 to zero to force a page break.)show
881 169 gm
(See also \322$^\323, \322$~\323, \322$-\323 and \322$=\323 in section \322Special Variables\323.)show
F T cp
%%Page: ? 14
op
44 42 xl
1 1 pen
881 486 gm
(nc 44 42 1212 844 6 rc)kp
125 169 gm
1 setTxMode
1 fs
18 fz
bu fc
2 F /|______Times-Bold fnt
bn
(22. Info from system files)show
146 169 gm
0 fs
14 fz
bu fc
2 F /|______Times-Roman fnt
bn
(/etc/passwd)show
163 169 gm
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(Info is \($name, $passwd, $uid, $gid, $quota, $comment, $gcos, $dir, $shell\).)show
180 169 gm
(endpwent)show
180 360 gm
(Ends lookup processing.)show
195 169 gm
(getpwent)show
195 360 gm
(Gets next info.)show
210 169 gm
(getpwnam\(NAME\))show
210 360 gm
(Gets info by name.)show
225 169 gm
(getpwuid\(UID\))show
225 360 gm
(Gets info by uid.)show
240 169 gm
(setpwent)show
240 360 gm
(Resets lookup processing.)show
273 169 gm
14 fz
bu fc
2 F /|______Times-Roman fnt
bn
(/etc/group)show
290 169 gm
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(Info is a 4-item array: \($name, $passwd, $gid, $members\).)show
307 169 gm
(endgrent)show
307 360 gm
(Ends lookup processing.)show
322 169 gm
(getgrgid\(GID\))show
322 360 gm
(Gets info by group id.)show
337 169 gm
(getgrnam\(NAME\))show
337 360 gm
(Gets info by name.)show
352 169 gm
(getgrent)show
352 360 gm
(Gets next info.)show
367 169 gm
(setgrent)show
367 360 gm
(Resets lookup processing.)show
400 169 gm
14 fz
bu fc
2 F /|______Times-Roman fnt
bn
(/etc/hosts)show
417 169 gm
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(Info is \($name, $aliases, $addrtype, $length, @addrs\).)show
434 169 gm
(endhostent)show
434 360 gm
(Ends lookup processing.)show
449 169 gm
(gethostbyname\(NAME\))show
449 360 gm
(Gets info by name.)show
464 169 gm
(gethostent)show
464 360 gm
(Gets next info.)show
479 169 gm
(sethostent\(STAYOPEN\))show
479 360 gm
(Resets lookup processing.)show
512 169 gm
14 fz
bu fc
2 F /|______Times-Roman fnt
bn
(/etc/networks)show
529 169 gm
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(Info is \($name, $aliases, $addrtype, $net\).)show
546 169 gm
(endnetent)show
546 360 gm
(Ends lookup processing.)show
561 169 gm
(getnetbyaddr\(ADDR,TYPE\))show
561 360 gm
(Gets info by address and type.)show
576 169 gm
(getnetbyname\(NAME\))show
576 360 gm
(Gets info by name.)show
591 169 gm
(getnetent)show
591 360 gm
(Gets next info.)show
606 169 gm
(setnetent\(STAYOPEN\))show
606 360 gm
(Resets lookup processing.)show
639 169 gm
14 fz
bu fc
2 F /|______Times-Roman fnt
bn
(/etc/services)show
656 169 gm
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(Info is \($name, $aliases, $port, $proto\).)show
673 169 gm
(endservent)show
673 360 gm
(Ends lookup processing.)show
688 169 gm
(getservbyname\(NAME, PROTO\))show
688 360 gm
(Gets info by name.)show
703 169 gm
(getservbyport\(PORT, PROTO\))show
703 360 gm
(Gets info by port.)show
718 169 gm
(getservent)show
718 360 gm
(Gets next info.)show
733 169 gm
(setservent\(STAYOPEN\))show
733 360 gm
(Resets lookup processing.)show
766 169 gm
14 fz
bu fc
2 F /|______Times-Roman fnt
bn
(/etc/protocols)show
783 169 gm
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(Info is \($name, $aliases, $proto\).)show
800 169 gm
(endprotoent)show
800 360 gm
(Ends lookup processing.)show
815 169 gm
(getprotobyname\(NAME\))show
815 360 gm
(Gets info by name.)show
830 169 gm
(getprotobynumber\(NUMBER\))show
830 360 gm
(Gets info by number.)show
845 169 gm
(getprotoent)show
845 360 gm
(Gets next info.)show
860 169 gm
(setprotoent\(STAYOPEN\))show
860 360 gm
(Resets lookup processing.)show
F T cp
%%Page: ? 15
op
44 42 xl
1 1 pen
860 484 gm
(nc 44 42 1212 844 6 rc)kp
125 169 gm
1 setTxMode
1 fs
18 fz
bu fc
2 F /|______Times-Bold fnt
bn
(23. Regular expressions)show
145 169 gm
0 fs
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(Standard UNIX regular expressions, with the following additions:)show
162 169 gm
(\( \) | { })show
176 197 gm
(do not have to be escaped with a \\ .)show
193 169 gm
(+)show
193 197 gm
(matches the preceding pattern element one or more times.)show
210 169 gm
(?)show
210 197 gm
(matches zero or one times.)show
227 169 gm
({)show
2 fs
bu fc
2 F /|______Times-Italic fnt
bn
(n)show
0 fs
bu fc
2 F /|______Times-Roman fnt
bn
(,)show
2 fs
bu fc
2 F /|______Times-Italic fnt
bn
(m)show
0 fs
bu fc
2 F /|______Times-Roman fnt
bn
(})show
241 197 gm
(denote the minimum \()show
2 fs
bu fc
2 F /|______Times-Italic fnt
bn
(n)show
0 fs
bu fc
2 F /|______Times-Roman fnt
bn
(\) and maximum \()show
2 fs
bu fc
2 F /|______Times-Italic fnt
bn
(m)show
0 fs
bu fc
2 F /|______Times-Roman fnt
bn
(\) match count. {)show
2 fs
bu fc
2 F /|______Times-Italic fnt
bn
(n)show
0 fs
bu fc
2 F /|______Times-Roman fnt
bn
(} means )show
2 fs
bu fc
2 F /|______Times-Italic fnt
bn
(n)show
255 197 gm
0 fs
bu fc
2 F /|______Times-Roman fnt
bn
(times; {)show
2 fs
bu fc
2 F /|______Times-Italic fnt
bn
(n)show
0 fs
bu fc
2 F /|______Times-Roman fnt
bn
(,} means at least )show
2 fs
bu fc
2 F /|______Times-Italic fnt
bn
(n)show
0 fs
bu fc
2 F /|______Times-Roman fnt
bn
( times.)show
272 169 gm
(\\w)show
272 197 gm
(matches alphanumeric, including \322_\323, \\W matches non-alphanumeric.)show
289 169 gm
(\\b)show
289 197 gm
(matches word boundaries, \\B matches non-boundaries.)show
306 169 gm
(\\s)show
306 197 gm
(matches whitespace, \\S matches non-whitespace.)show
323 169 gm
(\\d)show
323 197 gm
(matches numeric, \\D matches non-numeric.)show
340 169 gm
(\\n, \\r, \\f, \\t and \\NNN have their usual meaning.)show
357 169 gm
(\\w, \\s and \\d may be used within character classes, \\b denotes backspace in this)show
371 197 gm
(context.)show
388 169 gm
(\\1 ... \\9 refer to matched sub-expressions inside the match.)show
422 169 gm
(See also \322$1\323 ... \322$9\323, \322$+\323, \322$&\323, \322$ ` \323 and \322$ \253 \323 in section)show
436 169 gm
(\322Special Variables\323.)show
473 169 gm
1 fs
18 fz
bu fc
2 F /|______Times-Bold fnt
bn
(24. Special variables)show
493 169 gm
0 fs
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(The following variables are global and should be)show
507 169 gm
(localized in subroutines:)show
524 169 gm
($_)show
524 197 gm
(The default input and pattern-searching space.)show
541 169 gm
($ )show
1 fs
bu fc
2 F /|______Times-Bold fnt
bn
(.)show
541 197 gm
0 fs
bu fc
2 F /|______Times-Roman fnt
bn
(The current input line number of the last filehandle that was read.)show
558 169 gm
($/)show
558 197 gm
(The input record separator, newline by default.)show
575 169 gm
($ ,)show
575 197 gm
(The output field separator for the print operator.)show
592 169 gm
($")show
592 197 gm
(The separator which joins elements of arrays interpolated i)show
592 477 gm
(n)show
592 482 gm
( strings.)show
609 169 gm
($ \\)show
609 197 gm
(The output record separator for the print operator.)show
626 169 gm
($#)show
626 197 gm
(The output format for printed numbers. Initial value is \322%.20g\323.)show
643 169 gm
($*)show
643 197 gm
(Set to 1 to do multiline matching within a string, 0 to assume strings)show
657 197 gm
(contain a single line. Default is 0.)show
674 169 gm
($?)show
674 197 gm
(The status returned by the last backtick \( ` ` \) command, pipe close or)show
688 197 gm
(system operator.)show
705 169 gm
($])show
705 197 gm
(The perl version string \(as displayed with \322perl -v\323\), or number.)show
722 169 gm
($[)show
722 197 gm
(The index of the first element in an array, and of the first character in a)show
736 197 gm
(substring. Default is 0.)show
753 169 gm
($;)show
753 197 gm
(The subscript separator for multi-dimensional array emulation. Default is)show
767 197 gm
("\\034".)show
784 169 gm
($!)show
784 197 gm
(If used in a numeric context, yields the current value of errno. If used in)show
798 197 gm
(a string context, yields the corresponding error string.)show
815 169 gm
($@)show
815 197 gm
(The perl error message from the last eval or \322do EXPR\323 command.)show
832 169 gm
($:)show
832 197 gm
(The set of characters after which a string may be broken to fill)show
846 197 gm
(continuation fields \(starting with \322^\323\) in a format.)show
863 169 gm
($0)show
863 197 gm
(The name of the file containing the perl script being executed.)show
880 169 gm
($$)show
880 197 gm
(The process number of the perl running this script. Altered \(in the child)show
894 197 gm
(process\) by fork\( \).)show
F T cp
%%Page: ? 16
op
44 42 xl
1 1 pen
894 288 gm
(nc 44 42 1212 844 6 rc)kp
886 265 gm
1 setTxMode
0 fs
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(Perl Reference Guide revision 3.0.44.0)show
-4096 -4096 gm
0 gr
-4095 -4095 lin
6 25 lw
874 166 gm
874 167 lin
874 166 gm
875 166 lin
25 6 lw
1 1 lw
-4096 -4096 gm
-4095 -4095 lin
6 25 lw
874 167 gm
874 550 lin
25 6 lw
1 1 lw
-4096 -4096 gm
-4095 -4095 lin
6 25 lw
874 550 gm
875 550 lin
25 6 lw
1 1 lw
-4096 -4096 gm
-4095 -4095 lin
6 25 lw
874 166 gm
892 166 lin
25 6 lw
1 1 lw
-4096 -4096 gm
-4095 -4095 lin
6 25 lw
874 550 gm
892 550 lin
25 6 lw
1 1 lw
903 178 gm
1 setTxMode
currentfont SwToSym
(\323)show
setfont
( 1990, 1991 Johan Vromans. Usage, reproduction and distribution is free.)show
-4096 -4096 gm
0 gr
-4095 -4095 lin
6 25 lw
906 166 gm
906 167 lin
25 6 lw
1 1 lw
-4096 -4096 gm
-4095 -4095 lin
6 25 lw
906 167 gm
906 550 lin
25 6 lw
1 1 lw
-4096 -4096 gm
-4095 -4095 lin
6 25 lw
25 6 lw
1 1 lw
-4096 -4096 gm
-4095 -4095 lin
6 25 lw
891 166 gm
906 166 lin
25 6 lw
1 1 lw
-4096 -4096 gm
-4095 -4095 lin
6 25 lw
891 550 gm
906 550 lin
25 6 lw
1 1 lw
122 169 gm
1 setTxMode
($<)show
122 197 gm
(The real uid of this process.)show
139 169 gm
($>)show
139 197 gm
(The effective uid of this process.)show
156 169 gm
($ \()show
156 197 gm
(The real gid of this process.)show
173 169 gm
($ \))show
173 197 gm
(The effective gid of this process.)show
190 169 gm
($^T)show
190 197 gm
(The time \(as delivered by \322time\323\) when the program started. This value)show
204 197 gm
(is used by the file test operators \322\320M\323, \322\320A\323 and \322-C\323.)show
224 169 gm
(The following variables are context dependent and need not be localized:)show
241 169 gm
($%)show
241 197 gm
(The current page number of the currently selected output channel.)show
258 169 gm
($=)show
258 197 gm
(The page length of the current output channel. Default is 60 lines.)show
275 169 gm
($\320)show
275 197 gm
(The number of lines left on the page.)show
292 169 gm
($~)show
292 197 gm
(The name of the current report format.)show
309 169 gm
($^)show
309 197 gm
(The name of the current top-of-page format.)show
326 169 gm
($ |)show
326 197 gm
(If set to nonzero, forces a flush after every write or print on the currently)show
340 197 gm
(selected output channel. Default is 0.)show
357 169 gm
($ARGV The name of the current file when reading from < > .)show
377 169 gm
(The following variables are always local to the current block:)show
394 169 gm
($&)show
394 197 gm
(The string matched by the last pattern match.)show
411 169 gm
($ `)show
411 197 gm
(The string preceding what was matched by the last pattern match.)show
428 169 gm
($ \253)show
428 197 gm
(The string following what was matched by the last pattern match.)show
445 169 gm
($+)show
445 197 gm
(The last bracket matched by the last search pattern.)show
462 169 gm
($1 ... $9)show
476 197 gm
(Contains the subpattern from the corresponding set of parentheses in the)show
490 197 gm
(last pattern matched.)show
527 169 gm
1 fs
18 fz
bu fc
2 F /|______Times-Bold fnt
bn
(25. Special arrays)show
547 169 gm
0 fs
12 fz
bu fc
2 F /|______Times-Roman fnt
bn
(@ARGV)show
547 227 gm
(Contains the command line arguments for the script \(not including)show
561 227 gm
(the command name\).)show
578 169 gm
(@INC)show
578 227 gm
(Contains the list of places to look for perl scripts to be evaluated)show
592 227 gm
(by the \322do FILENAME\323 and \322require\323 command.)show
609 169 gm
(@_)show
609 227 gm
(Parameter array for subroutines. Also used by split if not in array)show
623 227 gm
(context.)show
640 169 gm
(%ENV)show
640 227 gm
(Contains the current environment.)show
657 169 gm
(%INC)show
657 227 gm
(List of files that have been \322require\323-d or \322do\323-ne.)show
674 169 gm
(%SIG)show
674 227 gm
(Used to set signal handlers for various signals.)show
F T cp
%%Trailer
cd
end
%%Pages: 16 0
%%EOF
SHAR_EOF
echo 'File refbase.ps is complete' &&
chmod 0644 refbase.ps ||
echo 'restore of refbase.ps failed'
Wc_c="`wc -c < 'refbase.ps'`"
test 89620 -eq "$Wc_c" ||
echo 'refbase.ps: original size 89620, current size' "$Wc_c"
rm -f _shar_wnt_.tmp
fi
rm -f _shar_seq_.tmp
echo You have unpacked the last part
exit 0
--
Johan Vromans jv@mh.nl via internet backbones
Multihouse Automatisering bv uucp: ..!{uunet,hp4nl}!mh.nl!jv
Doesburgweg 7, 2803 PL Gouda, The Netherlands phone/fax: +31 1820 62911/62500
------------------------ "Arms are made for hugging" -------------------------