perl make a new directory
use strict; use warnings; sub main { my $directory = "temp"; unless(mkdir $directory) { die "Unable to create $directory\n"; } } main();
Source: caveofprogramming.com
perl make a new directory
use strict; use warnings; sub main { my $directory = "temp"; unless(-e $directory or mkdir $directory) { die "Unable to create $directory\n"; } } main();
Source: caveofprogramming.com