+ my $action = $command;
+ $action =~ s/^pre_//;
+ $action =~ s/^post_//;
+ $action =~ s/^inter_//;
+ $action =~ s/^dle_//;
+ $action =~ s/^host_//;
+ $action =~ s/^level_//;
+
+ if ($action eq 'amcheck' || $action eq 'selfcheck') {
+ $self->{action} = 'check';
+ } elsif ($action eq 'estimate') {
+ $self->{action} = 'estimate';
+ } elsif ($action eq 'backup') {
+ $self->{action} = 'backup';
+ } elsif ($action eq 'recover' || $action eq 'restore') {
+ $self->{action} = 'restore';
+ } elsif ($action eq 'validate') {
+ $self->{action} = 'validate';
+ }
+
+ if ($action eq 'backup') {
+ $self->_set_mesgout();
+ }
+