open (OUTFILE, ">$basedir/$fileName"); #### open (OUTFILE, ">$basedir/$subdir/$fileName"); #### mkdir("$basedir/$subdir") unless -d "$basedir/$subdir"; open (OUTFILE, ">$basedir/$subdir/$fileName") or die "Could not open $basedir/$subdir/$fileName: $!";