Ella Cai <[EMAIL PROTECTED]> writes:
> My codes is like this:
> **********************************************************************
> my $new_data_dir = "/var/tmp/sct_1.61/data";
> mkdir ($new_data_dir, 0744) unless (-d $new_data_dir);
> **********************************************************************
>
> /var/tmp exists, but /sct_1.61/data does not exist under
> /var/tmp. It looks like mkdir function does not work well. It does
> not create /sct_1.61/data. Could you please let me know why? and how
> to solve it?
You need to run mkdir twice for it to work:
mkdir("/var/tmp/sct_1.61", 0744);
mkdir("/var/tmp/sct_1.61/data", 0744);
The standard File::Path module have a mkpath() function that you might
consider usings instead of mkdir directly. It will create all missing
parent directories for you.
Regards,
Gisle Aas,
ActiveState
_______________________________________________
Perl-Unix-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
