Help for this page

Select Code to Download


  1. or download this
    $DATE = `date +%Y-%m-%d`;
chomp $DATE;
$CURRDIR = '/home/'.$USER.'/'.$DATE;
chdir ($CURRDIR) || die "Couldn't change to $CURRDIR Reason: $!";
  2. or download this
    -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.
  3. or download this
    $DATE = `date +%Y-%m-%d`;
chomp $DATE;
my $USER=getlogin();
$CURRDIR = '/home/'.$USER.'/'.$DATE;
chdir ($CURRDIR) || die "Couldn't change to $CURRDIR Reason: $!";