$dir= "VEHICLES";
mkdir ($dir);
chdir ($dir);
foreach $file(@files)
{

  mkdir $file;
  chdir $file;
  chdir $dir;
}