Perl
Perl
Transition from MailMan.GetUidls to MailMan.FetchUidls
Provides instructions for replacing deprecated GetUidls method calls with FetchUidls.Chilkat Perl Downloads
use chilkat();
$success = 0;
$mailman = chilkat::CkMailMan->new();
# ...
# ...
# ------------------------------------------------------------------------
# The GetUidls method is deprecated:
# sa is a StringArray
$sa = $mailman->GetUidls();
if ($mailman->get_LastMethodSuccess() == 0) {
print $mailman->lastErrorText() . "\r\n";
exit;
}
# ...
# ...
# ------------------------------------------------------------------------
# Do the equivalent using FetchUidls.
# Your application creates a new, empty StringTable object which is passed
# in the last argument and filled upon success.
$st = chilkat::CkStringTable->new();
$success = $mailman->FetchUidls($st);
if ($success == 0) {
print $mailman->lastErrorText() . "\r\n";
exit;
}