Embedding

Embedding scripts

<script name="word_idx" lang="perl">
while(<>) {
  $widx{$_}++ foreach split(/\W+/);
}
print "$_\n" foreach sort keys %widx;
exit 0;

            

Note that you do not need to escape XML characters such as

word_idx(File)
  req: File
  srun: script(word_idx) File
  flat: File.wi
            

Embedding relations

Embedding prolog rules