eval could be an option :
eval { block that executes somethign with DBI }
if ($@) {
send email here.
}
-Mensagem original-
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] nome de Bill -
compuserve
Enviada em: quinta-feira, 19 de maio de 2005 11:19
Para: activeperl mailing list
As
you are redeclaring $scount
my ($scount,$spaces) = split /,/; <
should be
($scount,$spaces)
and $spaced to be priviouly declared.
"use strict;" will help this kind of issue.
cheers,
VX
-Mensagem original-
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] nome de
[EMAIL
why
don't you try here :
http://search.cpan.org/search?query=IMAP&mode=all
-Mensagem original-De:
[EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]Em nome de Nguon,
VathEnviada em: quarta-feira, 22 de dezembro de 2004
18:48Para: ActivePerl@listserv.ActiveState.comAssunto:
Mailbox a
