Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -w
use strict;

...
foreach my $constant (@constants) {
  print $constant, " = ", eval($constant), $/;
}

Select or download this

CU_OK = 0
CU_BAD_SYNTAX = 1
CU_UNKNOWN_DOMAIN = 2
...
CU_UNKNOWN_USER = 4
CU_SMTP_TIMEOUT = 5
CU_SMTP_UNREACHABLE = 6