펄 시스템 특수 변수

      $!                   
       $-          ,  Perl         
      $”       
      $#                
      $$ Perl      ID 
      $%             
      $&             
      $(       ID 
      $)         ID 
      $*   1        .    /s /m      . 
      $,           
      $.                
      $/          ,        
      $:     ,          ,        . 
      $;               . 
      $?              
      $@ Perl    eval          
      $[              
      $\            
      $] Perl         
      $^                  
      $^A                 
      $^D        
      $^E   UNIX               
      $^F            
      $^H               
      $^I           
      $^L               
      $^M          
      $^O       
      $^P              
      $^R               
      $^S         
      $^T         ,                
      $^W          
      $^X Perl            
      $_      /          
      $|                   
      $~           
      $`                
      $’                
      $+                       
      $<              ID 
      $                    
      $=             
      $>          ID 
                    
      $ARGV                    
      %ENV        
      %INC   do require        
      %SIG            
      @_            
      @ARGV              
      @INC                 
      $-[0] $+[0]                                。

    
    
    
    

     
     
     
              
     
     
     
     
              
     
     
     
     
＄_  ＄ARG                   
     
     
     
     
      
     
     
     
     
     /          
     
     
     
     
@_  n/a        ，    : ＄_[num] 
     
     
     
     
          
     
     
     
     
@ARGV  n/a           
     
     
     
     
＄ARGV  n/a        <>   ，             
     
     
     
     
                  
     
     
     
     

     
     
     
     
         
     
     
     
     
＄(num)  n/a  n/a 
     
     
     
     
＄&  ＄MATCH                    
     
     
     
     
＄'  ＄POSTMATCH                    
     
     
     
     
＄`  ＄PREMATCH                   
     
     
     
     
＄+  ＄LAST_PAREN_MATCH                       
     
     
     
     
     
     
     
     
     
                      
     
     
     
     

     
     
     
     
    /    
     
     
     
     
＄.  ＄INPUT_LINE_NUMBER               
     
     
     
     
＄/  ＄INPUT_RECORD_SEPARATOR 
     
     
     
     
＄/   ＄OUTPUT_RECORD_SEPARATOR          ,       
     
     
     
     
＄|   ＄OUTPUT_AUTOFLUSH                  
     
     
     
     
＄,  ＄OUTPUT_FIELD_SEPARATOR          
     
     
     
     
＄"  ＄LIST_SEPARATOR       
     
     
     
     
＄*    1        .    /s /m      . 
     
     
     
     
＄-[0]                            
     
     
     
     
＄+[0]                             
     
     
     
     
 
     
     
     
     

     
     
     
     
      /    
     
     
     
     
＄#  ＄OFMT                
     
     
     
     
＄  ＄OUTPUT_AUTOFLUSH           
     
     
     
     
＄%  ＄FORMAT_PAGE_NUMBER            
     
     
     
     
＄=  ＄FORMAT_LINES_PER_PAGE            
     
     
     
     
＄-  ＄FORMAT_LINES_LEFT          ,  Perl        
     
     
     
     
＄~  ＄FORMAT_NAME          
     
     
     
     
＄^  ＄FORMAT_TOP_NAME                  
     
     
     
     
＄:  ＄FORMAT_LINE_BREAK_CHARACTERS     ,          ,        
     
     
     
     
＄^L  ＄FORMAT_FORMFEED              
     
     
     
     
＄^A  ＄ACCUMULATOR                
     
     
     
     
＄;                
     
     
     
     

     
     
     
     
      
     
     
     
     
＄?  ＄CHILD_ERROR             
     
     
     
     
＄@  ＄EVAL_ERROR Perl    eval         
     
     
     
     
＄!  ＄ERRNO  #                 
     
     
     
     
＄^E  ＄EXTENDED_OS_ERROR   UNIX              
     
     
     
     

     
     
     
     
      
     
     
     
     
＄＄  ＄PROCESS_ID Perl      ID
     
     
     
     
＄＄>  ＄EFFECTIVE_USER_ID          ID
     
     
     
     
＄(  ＄REAL_GROUP_ID       ID
     
     
     
     
＄)  ＄EFFECTIVE_GROUP_ID         ID
     
     
     
     
＄0  ＄PROGRAM_NAME              
     
     
     
     
＄^X  ＄EXECUTABLE_NAME Perl           
     
     
     
     
＄]  n/a              
     
     
     
     
＄[  n/a Perl         
     
     
     
     
＄^O  ＄OSNAME      
     
     
     
     
＄^T  ＄BASETIME         ,                
     
     
     
     
＄^W  ＄WARNING         
     
     
     
     
%ENV  n/a       
     
     
     
     
%SIG  n/a           
     
     
     
     
＄^C  ＄COMPILING 
     
     
     
     
＄^D  ＄DEBUGGING       
     
     
     
     
＄^F  ＄SYSTEM_FD_MAX           
     
     
     
     
＄^I  ＄INPLACE_EDIT          
     
     
     
     
＄^M  n/a         
     
     
     
     
＄^P  ＄PERLDB             
     
     
     
     
＄^R  ＄LAST_REGEXP_CODE_RESULT              
     
     
     
     
＄^S  ＄EXCEPTIONS_BEING_CAUGHT        
     
     
     
     
＄^V  ＄PERL_VERSION 
     
     
     
     
＄^H                
     
     
     
     

     
     
     
     

     
     
     
     
    
     
     
     
     
@INC  n/a                 
     
     
     
     
%INC   n/a   do require       
    
    
    
    
[]