Help for this page

Select Code to Download


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