use Mail::POP3Client;

$pop = new Mail::POP3Client(
	USER => "my\@email.address",
	PASSWORD => "passwordxxxxx",
	HOST     => "mail.mydomain.com"
);

for($i = 1; $i <= $pop->Count(); $i++)
{
	$body = $pop->Body($i);
	print "<p>$body<p><hr>";
}