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

use strict;
use CGI::Auto;

CGI::Auto::auto(title       => "test 3: grep #paterns# /usr/share/dict/words",
                command     => "grep [%s(pattern)] /usr/share/dict/words | head -50",
                description => "Grep in action!",
                # tohtml      => "items",
                tohtml      => "enumeration",
               );