#!/usr/bin/perl
#-->cgi:/home/jj/public_html/bin/d7
#-->dir:/tmp/lixo

use strict;
use CGI::Auto;

CGI::Auto::auto(title    => "test 7: grep #options# #paterns# fixfile",
   command  => "grep [%o(option)] [%s(pattern)] /home/jj/public_html/pln/proverbio.dic",
   tohtml => "items",
   latin1 => 1,
   debug    => 1,
   -option  => [ ignore_case    => "-i", not_containing => "-v"],
);