SPUG: test directory and then create
Pommert, Daniel
Daniel.Pommert at verizonwireless.com
Wed Jan 9 18:25:59 CST 2002
Try:
perl -MFile::Path -ane 'mkpath($_, 0, 0755) foreach @F' <
list_of_directories
-----Original Message-----
From: garrett esperum [mailto:shamonsflame at hotmail.com]
Sent: Wednesday, January 09, 2002 2:59 PM
To:
Subject: SPUG: test directory and then create
Hello all,
I am using solaris 2.6 and perl 5.6.1.
I have an external file that has multiple directory names listed in it. The
directory names in this file are seperated by a tab. I want to read this
external file and I want to test to see if each of these directories exists.
If these directories don't exist I want to create them. If they do exist I
don't want to do anything.
How do I do this in PERL? How do I do the dir test? And how do I perform the
loop?
Thank You!
-garrett
_________________________________________________________________
Send and receive Hotmail on your mobile device: http://mobile.msn.com
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
POST TO: spug-list at pm.org PROBLEMS: owner-spug-list at pm.org
Subscriptions; Email to majordomo at pm.org: ACTION LIST EMAIL
Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address
For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest
Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
POST TO: spug-list at pm.org PROBLEMS: owner-spug-list at pm.org
Subscriptions; Email to majordomo at pm.org: ACTION LIST EMAIL
Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address
For daily traffic, use spug-list for LIST ; for weekly, spug-list-digest
Seattle Perl Users Group (SPUG) Home Page: http://zipcon.net/spug/
More information about the spug-list
mailing list