Как в smalltalk прочитать и обработать содержимое CSV-файла

Я пытаюсь прочитать и обработать содержимое файла csv в smalltalk(visualworks), но, похоже, у меня возникли трудности с разбиением строки на массив. Ниже приведен код, который мне удалось заставить работать. Чего мне не хватает, так это фрагмента, который разбивает содержимое переменной myLine, которая представляет собой строку с разделителями-запятыми, на массив строк, которые нужно добавить в TwoDList. Пожалуйста, помогите с любой информацией, которая у вас может быть о том, как подойти к этому, пожалуйста. Спасибо

SpreadsheetReadCSV:  inFilename
    |inStream myLine rcnt|  
      rcnt := 0.
       " scan thru the text lines, using a traditional i/o loop "
       inStream :=  (inFilename asFilename) readStream  .
       [ inStream atEnd ] whileFalse: [
             rcnt := rcnt + 1. 
            myLine := inStream upTo: Character cr.
                "Process the commadelimited string here"
       ].
      inStream inspect. 
      inStream close.
   ^myLine.
6
задан Kobojunkie 12 March 2012 в 14:03
поделиться