@badcode=`ifconfig`;

if (grep(/ppp0/,@badcode)){print"Connexion PPP OK !!!}