> > 01/02/2009 30.00 400.00 t Randall Dow
> (use (@A @B @C @D @E)
> (when (match '(@A " " @B " " @C " " @D " " @E) (line))
> (mapcar clip (list @A @B @C @D @E)) ) )
While this is an elegant solution, it does not work as expected, because
the '@X' symbols do not necessarily match non-white characters.
I would stick with Randall's solution, just a little simplified:
(filter prog (split (line) " "))