#!/usr/bin/perl

use strict;
use warnings;
use Mail::Box::Manager;

my $mgr    = Mail::Box::Manager->new;

my $mailbox = $mgr->open(
                      type              => 'pop3',
                      username     => 'Name',
                      password      => 'Passwort',
                      server_name => 'domain.de',
                   );

for my $msg ($mailbox->messages) 
{
  # all messages
  my @to = $msg->to;
  print "@to\n";
}