je voudrais quand je me connect a ma page avoir une case ou je puisse cliqué et ou ca m envoi mon IP par mail
j ai reussi a recup l IP mais je sais pas comment faire pour me lenvoyer par mail

voici une fonction écris en Perl ki envoi un mail tester sous Linux car sendmail pas, g pas essayer sous Windows,
 
$corp contient le corp du mail
@tete estun tableu ki contient
$tete[0] = email de l'emetteur
$tete[1] = email du destinataire
$tete[2] = sujet du mail
 
sub envoimail {
my ( $corps ) = shift;
       my ( @tete ) = shift;
 
open(SENDMAIL, "|/usr/sbin/sendmail -oi -t -odq" ) or die "fork impossible pour SendMail : $!\n";
print SENDMAIL <<"EOF_MAIL";
From: $tete[0]  
To: $tete[1]
Subject: $tete[2]
 
$corps
 
EOF_MAIL
 
close(SENDMAIL) or warn "Sendmail ne s'est pas fermé correctement\n";
}