delete-all-pop3.php

<?php 
// Source: http://www.web-max.ca/PHP/email_1.php

$username = '';
$password = '';
$server = 'pop3.example.com'
$port = 110;

$cmd = array();
$cmd[]  = "USER $username\r\n";
$cmd[]  = "PASS $password\r\n";
$cmd[]  = "STAT\r\n";
$cmd[]  = "QUIT\r\n";

$fp  = fsockopen($server, $port);

if(!$fp) {
    print("Error connecting to server $server");
} else {
    $ret = fgets($fp, 1024);

    foreach($cmd as $ret) {            
      fputs($fp, $ret);

      $line = fgets($fp, 1024);

      print($line."<br>");

        if($ret == "STAT\r\n") {
            $fields = explode(" ", $line);
            $num_mails = $fields[1];

            for($i = 1; $i <= $num_mails; $i++) {
              fputs($fp, "DELE $i\r\n");
              $line = fgets($fp, 1024);
            }
        }
    }
}
?>