use Data::Dumper; ... my $msg_count = $pop->login( $user, $pass ) or do { print "Could not login.\n"; next; }; print Dumper($msg_count);