mod_perl examples

[Ilya Soldatkin]

Hi!
I am beginner in mod_perl.  I think it will be good for me to see some
mod_perl script examples. Above all I would like to see style of
programming. It will be great if these scripts work with DBI. Could you
recommend(give URL) or send me several scripts with good style of
programming in mod_perl?

Thanks
Ilya