package ISPMan::Log;

use strict;
use Carp;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK $Config $isLogFileOpen);

require Exporter;

@ISA = qw(Exporter AutoLoader);
@EXPORT = qw(log_event);
$VERSION = '0.01';



log_event("called by  " . caller());

sub log_event  {
return;
    my $logstring = join(" " ,    " " , @_ );
    $logstring   = $logstring;
   carp($logstring);
}
 
1;
 
 
__END__