postscript - 如何在 PostScript 中将字符串拆分为数组

Question

按给定字符将字符串拆分为数组的最简单方法是什么？例如，通过空间分割来制作一个单词数组；甚至制作一个包含字符串所有字符的数组。

我能想到的唯一方法是使用 search在一个循环中。由于所有语言都有用于此目的的函数，恐怕我在 PostScript 中缺少一个函数。这样做。

Answer 1

%!

%(string) (delimiter)  split  [(s)(t)(r)(i)(n)(g)]
/split {              % str del
    [ 3 1 roll        % [ str del
    {                 % [ ... str del
        search {      % [ ... post match pre
            3 1 roll   % [ ... pre post match  %ie. [ ... pre str' del
        }{            % [ ... str
            exit       % [ ... str  %% break-from-loop
        }ifelse
    }loop             % [ ...
    ]                 % [ ... ]
} def

(string of words separated by spaces)( )split ==
%-> [(string) (of) (words) (separated) (by) (spaces)]

(string.of.words.separated.by.dots)(.)split ==
%-> [(string) (of) (words) (separated) (by) (dots)]