:


         .
     "" 
..          '$'
         
 - .      ""
        :

	use English;

           
     :

	use FileHandle;

     :

	  



	 -> ()


          () .
        
      .



	 -       .
          
  .


	      
     .   
   .     1.


$MATCH
	      .


	   .


$POSTMATCH
	    .


$LAST_PAREN_MATCH
	       "".


$MULTILINE_MATCHING
	      1 
       
..   '\n' -  .    0
   .    5    
  .


$INPUT_LINE_NUMBER
$NR
	     .
      .


$RS
$INPUT_RECORD_SEPARATOR
	 -    .    '\n'


$OUTPUT_AUTOFLUSH
	        
      .    -0


$OFS
$OUTPUT_FIELD_SEPARATOR
	    print   
  .


$ORS
$OUTPUT_RECORD_SEPARATOR
	  print    .


$LIST_SEPARATOR
	 "$,"      
  "....".


$SUBSEP
$SUBSCRIPT_SEPARATOR
	 -       
.   '\034'.


$OFMT
	     .


$FORMAT_PAGE_NUMBER
	      .


$FORMAT_LINES_PER_PAGE
	  .   60 .


$FORMAT_LINES_LEFT
	    .


$FORMAT_NAME
	   .    .


$FORMAT_TOP_NAME
	     .


$FORMAT_LINE_BREAK_CHARACTERS
	     .  
     '^'.   '\n-'.


$FORMAT_FORMFEED
	   (  ).   '\f'.


$ACCUMULATOR
	    write()  format().
       
 formline() .. write()     .


$CHILD_ERROR
	      
:  pipe,   system(), wait()  `...`.


$ERRNO
$OS_ERROR
	      errno.
  -    .  
        
        
 die().


$EVAL_ERROR
	     eval().


$PID
$PROCESS_ID
	  .


$UID
$REAL_USER_ID
	 UID  .


$EUID
$EFFECTIVE_USER_ID
	 UID  .


$GID
$REAL_GROUP_ID
	 GID  .


$EGID
$EFFECTIVE_GROUP_ID
	 GID  .


$PROGRAM_NAME
	  .     
        ps,   
   .


	      .
   - 0.


$PERL_VERSION
	   .    perl -v
       .
         / 1000.


$DEBUGGING
	    '-D'.


$SYSTEM_FD_MAX
	     (system file
descriptor).   2.


$INPLACE_EDIT
	  inplace-edit .
   undef.


$PERLDB
	  .      
   .


$BASETIME
	     1970    .


$WARNING
	  '-w'. true -   false - .


$EXECUTABLE_NAME
	  .  argv[0]  .


	     '<>'.


	    .
! @#ARGV -     1 ..
$ARGV[0]    (  ).


	     
   do, require  use.


	       
  do  require.  -  ,   - .


	 %ENV    . 
       .


	 %SIG     
   INT, QUIT, PIPE, ...
 'DEFAULT' -   .
'IGNORE' -   .


Last-modified: Thu, 10 Sep 1998 13:38:38 GMT

  :