my @mkdir = ( "$year:$mon:$mday", "$hour:$min:$sec"); chdir ("/home/guest-content"); for ( my $count = 0; $count <= $#mkdir; $count++ ) { mkdir $mkdir[$count]; chdir $mkdir[$count]; }