my $err = `mkdir $FolderName 2>&1`; chomp ($err); if ($? != 0) { if ($? == 256) { print "Warning : $err"; } else { print "Error : $err"; } }