Hi Alex,

done!

Thx,
   Arie

2018-06-12 16:05 GMT+02:00 Alexander Burger <[email protected]>:

> Hi Arie,
>
> > This example (in "Traversing a Hash"):
> >
> >    #-----------------------------
> >    # download the following standalone program
> >    #!/usr/bin/picolisp /usr/lib/picolisp/lib.l
> >
> >    (load "@lib/misc.l")
> >
> >    (in (opt)
> >       (until (eof)
> >          (when (match '(~(chop "From: ") @From) (line))
> >             (accu 'From @From 1) ) ) )
> >
> >    (for Person (sort From)
> >       (prinl (car Person) ": " (cdr Person)) )
> >
> >    (bye)
> >
> > again has no input file given.
>
> I don't remember at all ;) But you could simply make something up.
>
> For example a file with
>
>    abc
>    From: Rory Gallagher
>    def
>    From: Jimi Hendrix
>    ghi
>    From: Eric Clapton
>    jkl
>    From: Rory Gallagher
>    mno
>
> gives
>
>    Eric Clapton: 1
>    Jimi Hendrix: 1
>    Rory Gallagher: 2
>
> ♪♫ Alex
>
> --
> UNSUBSCRIBE: mailto:[email protected]?subject=Unsubscribe
>

Reply via email to