simple completion example?

[Andy Spiegl <zsh.Andy@xxxxxxxxx>]

Hi, I am looking for an easy example of a completion script so that I can
start understanding and programming a little bit more complicated one for a
perl script.  It that takes the usual --help, --debug, --dir options
but also needs a command (view, dump, export, demux, ...) and then one or
more files (*.crid) from a directory.

I tried to start with _apt because it also uses "commands" but it's way to
complicated for a beginner like me. :-)

If anyone is interested the skript is here:
 http://spiegl.de/andy/shareware/gigaset

Thanks,
 Andy.

-- 
                              o      _     _         _
  ------- __o       __o      /\_   _ \\o  (_)\__/o  (_)          -o)
  ----- _`\<,_    _`\<,_    _>(_) (_)/<_    \_| \   _|/' \/       /\\
  ---- (_)/ (_)  (_)/ (_)  (_)        (_)   (_)    (_)'  _\o_    _\_v
 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 "Cats aren't dirty, they're just covered with cat spit."