请问perl里面的这些特殊字符是啥意思

mydii

use strict;

package Log::ErrLogger;

use vars qw{@Errors};
BEGIN {
  @Errors = qw{
                           ALL
                           DEBUGGING
                           INFORMATIONAL
                           UNEXPECTED
                           WARNING
                           ERROR
                           FATAL
                           NONE
                          };
}



#################################
# Typical object-oriented stuff #
#################################

use Exporter;

use vars qw{ @ISA @EXPORT_OK %EXPORT_TAGS $VERSION };

@ISA         = qw{ Exporter };
@EXPORT_OK   = (@Errors, "log_error", "tie", "LogError", "Tie");
%EXPORT_TAGS = (ErrorLevels => [@Errors]);
($VERSION)   = ( qw$Revision: 1.6 $ )[1];

use IO::Handle;



##############
# Prototypes #
##############

sub log_error( $$;@ );
sub tie( ;$ );
sub new( $;% );

# Prototypes don't do much for methods, but they make the code more readable.
sub sensitivity( $ );
sub set_sensitivity( $$ );
sub file_handle( $ );
sub set_file_handle( $$ );
sub log( $$$ );
sub close( $ );



###############################
# Set up the error severities #
###############################

for(my $i=0; $i<scalar(@Errors); $i++) {
  eval " use constant $Errors[$i] => $i ";
}



------------------
下面这些应该特殊符号代表什么啊 我查不到啊  谢谢了
sub log_error( $$;@ );
sub tie( ;$ );
sub new( $;% );

flw

perldoc perlsub

forlorngenius