Help for this page

Select Code to Download


  1. or download this
    mkdir "$dir", 0777 || die "Could not mkdir \"$dir\": $!\n";
  2. or download this
    my $dir= "source"; # A directory that I know exists.
warn "Using or...\n";
...
warn "Using ||...\n";
mkdir "$dir", 0777 || die "Could not mkdir \"$dir\": $!\n";
warn "Done.\n";
  3. or download this
    E:\etm\Work>perl -w mkdir.pl
Using or...
Could not mkdir "source": File exists
Using ||...
Done.