my $error = $self->message(); #### $result = qx(mkdir $path); #### eval{$self->sys('cmd /C mkdir', '-p', "$self->{tmp}/attach")}; if ($@){ print "$@\n"; }