perl []
() :
1. '-e'
2. .
#!/usr/bin/perl ""
.
3. /
.
'-'.
1 2
'-x',
'#!' 'perl'.
'__END__'.
'#!' . '#!/bin/perl -d'
.
""
. .
.
exit() die() exit(0)
.
- . \0.
(split) $_
$F. -n -p.
.
.
. -d14
.
1 p
2 s
4 l
8 t
16 o
32 c /
64 p -P
128 m
256 f
512 r
1024 x
2048 u
4096 L ""
8192 H
16384 X scratchpad
32768 D
.
-a
'<>'.
,
.
:
perl -p -i.old -e "s///" file
- "" "" file
file.old
includ- . -P
/usr/include /usr/lib/perl.
. .
1. -n -p
2. $\.
print .
. sed awk.
BEGIN END
. .
-n .
.
'if', 'else' 'define'
.. - .
.
'-' ,
true.
PATH .
"#!" .
"" .
(setuid, setguid).
CGI .
.
undump.
.
.
.
,
, ,
,
"", ,
, 100 .
. '#!'
perl. - '__END__'
.
DATA.
Last-modified: Thu, 24 Apr 1997 18:05:20 GMT