Разбор текста на составляющие, на любом языке Опции

[ViGOur]

Есть примерно такой текст:

А текст
А0 текст
А1 текст
...
А00 текст
А01 текст
...
А000 текст
А001 текст
...
Б текст
Б0 текст
...
Б00 текст
...
Б000 текст
...

Нужно его разложить по файлам и директориям соответсвенно:

./А/file -> текст
./А/0/file -> текст
./А/1/file -> текст
...
./А/0/0/file -> текст
./А/0/1/file -> текст
...
./А/0/0/0/file -> текст
./А/0/0/1/file -> текст
...
./Б/file -> текст
./Б/0/file -> текст
...
./Б/0/0/file -> текст
...
./Б/0/0/0/file -> текст
...

Реализация может быть на любом кросспатформенном языке программирования.
Интересна скорость реализаци на том или ином языке программирования. Можно использовать сторонние библиотеки.

file -> текст
это текст в файле с именем file.

p.s. вложенность может быть любой, от Б до БN, потому не привязывайтесь к директориям с 3 уровнем вложенности.

[kwisp]

Раскрывающийся текст

# include <vector>
# include <string>
# include <algorithm>
# include <iostream>
# include <fstream>
# include <iterator>

typedef std::vector<char> chContainer;
typedef std::vector<char>::iterator chContainerIter;
typedef std::vector<char>::const_iterator chContainerConstIter;

void SSParser(const char* filename)
{
 std::ifstream file(filename);
 std::istreambuf_iterator<char> first(file.rdbuf());
 std::istreambuf_iterator<char> eos;
 chContainer chArray(first,eos);
 std::string dir("");
 const char space = ' ';
 const char caret = '\n';
 
 chContainerIter endChArray = chArray.end();
 chContainerIter newBegin = chArray.begin();

 chContainerIter spaceIter = std::find(newBegin, endChArray, space);
 chContainerIter endlIter = std::find(newBegin, endChArray, caret);

 while (spaceIter != endChArray) {
  dir.assign(newBegin,spaceIter);
  // создание директории dir ....
  newBegin =  endlIter+1;
  std::ofstream ofile(...); // файл в только что созданной дирректории
  std::copy(spaceIter+1,endlIter, ostreambuf_iterator(ofile));
  spaceIter = std::find(newBegin,endChArray, space);
  endlIter = std::find(newBegin,endChArray, caret);
 }
}

вот. без проверок корректности файла, с учетом последовательности А...N указанной в первом посте. ну и не знаю как кроссплатформенно создать директорию.