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";
    }