Shaunn Johnson wrote: > > --howdy. Hello,
> [snip] > > my $list="userlist.txt"; > my $file="newlist.txt"; > my $local_dir=cwd; > > open (DIR, $local_dir) or die "can nae open local directory: $!"; You cannot open a directory with open(), you need to use opendir() for that. However you are not using the DIR handle anywhere before you close() it so if you just want to see if the directory exists use "-d $local_dir". perldoc -f -d > my $date=`date '+%d %B %Y'`; > chomp ($date); You do not need to call an external program to get the date. This is a lot faster and more portable: use POSIX 'strftime'; my $date = strftime '%d %B %Y', localtime; John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
