Building on the above suggestions:
$DATE = `date +%Y-%m-%d`;
chomp $DATE;
$CURRDIR = '/home/'.$USER.'/'.$DATE;
chdir ($CURRDIR) || die "Couldn't change to $CURRDIR Reason: $!";
You most likely will find that you are not pulling $USER into the directory line.
-sh-3.1$ perl chdirtest.pl
Couldn't change to /home//2007-07-17 Reason: No such file or directory
+ at chdirtest.pl line 4.
Try assigning $USER, perhaps using get_login();
$DATE = `date +%Y-%m-%d`;
chomp $DATE;
my $USER=getlogin();
$CURRDIR = '/home/'.$USER.'/'.$DATE;
chdir ($CURRDIR) || die "Couldn't change to $CURRDIR Reason: $!";
"The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it." - Terry Pratchett
|