for my $count ( 0 .. $#mkdir ) {
    mkdir $mkdir[$count];
    chdir $mkdir[$count];
}