Select Code to Download

Dumper output $VAR1 = \'';

sub reverse_modifier {
        my (@undo) = @{$_[0]};
...

# Setup the log object
my $log = LogSimple->new( logdir => $logdir, logfile => $logfile, logl
+evel => $loglevel, verbosity => $verbosity, exit => \&Hitachi::Raidco
+m::exit_routine(\%modifier) );

package LogSimple;

...
}

1;