To delete the message I do this: $msg = $pop->Uidl($m); my @id = split(/\s+/, $msg); $msg = "@id[0]"; $pop->Delete($msg);