Perl - Buscador en perl

Hola!
Necesito hacer un buscador en perl, que dado un texto ingresado en un campo de texto, al presionar el boton "buscar" recorra un archivo buscando las coincidencias que encuentre y las muestre en un htm.
Gracias!

Si tu servidor es Unix o Linux:

#!/usr/bin/perl
use CGI;
$fichero = "nombre.archivo";
$busca = "cadena a buscar";
$resultado = `cat | grep $busca`;

print
$q->header(),
$q->start_html(-title=>"Buscando",
$q->hr,
$q->pre($resultado),
$q->hr,
$q->end_html;

Perdon, la linea 3 es:

$resultado = `cat $fichero| grep $busca`;