CHASQUEE:: Prog:: el Doctor es un objeto de documento para pasar para Chasquear-e indexer.

SINOPSIS

# SILBIDO de subclase:: Prog:: Doctor
# y cree _filter () métodos

embale Mi:: Prog:: Doctor
use la base qw (CHASQUEE:: Prog:: Doctor);

suscripción url_filter
{
mi $doc = cambio;
mi $url = $doc-> url;
$url = ~ s/my.foo.com/my.bar.org/;
$doc-> url ($url);
}

suscripción content_filter
{
mi $doc = cambio;
mi $buf = $doc-> contenido;
$buf = ~ s/foo/bar/gi;
$doc-> contenido ($buf);
}

1;

CHASQUEE:: Prog:: el Doctor es la clase baja para los objetos de Doctor en el SILBIDO:: Prog marco. El doctor se opone son creados y devueltos por el SILBIDO:: Prog-> esfuerzo () método.

Usted puede subclasificar el SILBIDO:: Prog:: Doctor y añadir _filter () métodos de cambiar los valores del objeto de Doctor antes de que sea devuelto del esfuerzo ().
Si usted subclasifica el SILBIDO:: Prog, usted DEBE subclasificar el SILBIDO:: Prog:: Doctor también, aun si sólo como un placeholder.

Ejemplo:

paquete MyApp:: Prog;
use la base qw (CHASQUEE:: Prog);

suscripción okey
{
mi $self = cambio;
mi $doc = cambio;

1; # todo es permitido (pero no todas las cosas son provechosos...)
}

1;

paquete MyApp:: Prog:: Doctor; # debe usar mismo nombre de clase bajo que encima

1;