Select Code to Download

Use of uninitialized value in concatenation (.) or string at /home/sho
+/perl/dev//LogMessages.pm line 43.
Cannot open logfile at /home/sho/perl/dev//LogMessages.pm line 43.

 40 sub log_message{
 41         my $self=shift;
...
 47                 print LOGFILE @_;
 48         }
 49 }

 41         my $self=shift;