Submit Hint Search The Forums LinksStatsPollsHeadlinesRSS
14,000 hints and counting!

Delete pop mail with a perl script Internet
I tried every shareware that's supposed to let you delete all your mail without downloading them first, but none worked with OS X.

Here's a very simple perl script that does just this. Be warned, though, that it deletes EVERYTHING without giving you any chance to cancel the process...

You will need the Net module available at CPAN (use these commands: perldoc perlmodinstall and perldoc Net::pop3)
#!/usr/bin/perl

use Net::POP3;
 $pop = Net::POP3->new('my.pop3.server');
 $tot = $pop->login('user','login');
 printf("$tot messagesn");
 for($i = 0; $i<$tot; $i++){
  $pop->delete($i);
 }
 $pop->quit();

    •    
  • Currently 2.60 / 5
  You rated: 4 / 5 (5 votes cast)
 
[9,752 views]  

Delete pop mail with a perl script | 0 comments | Create New Account
Click here to return to the 'Delete pop mail with a perl script' hint
The following comments are owned by whoever posted them. This site is not responsible for what they say.