| branch | ng | 
| changeset 6 | 31f1e0c6344d | 
| parent 5 | 2407e371ec7a | 
| child 7 | 2492cea31acd | 
| 5:2407e371ec7a | 6:31f1e0c6344d | 
|---|---|
6 use lib "lib";  | 
6 use lib "lib";  | 
7 use Exim;  | 
7 use Exim;  | 
8  | 
8  | 
9 my $exim = new Exim(basename => "exim4", config => "/etc/exim4/exim4.conf");  | 
9 my $exim = new Exim(basename => "exim4", config => "/etc/exim4/exim4.conf");  | 
10  | 
10  | 
11 print $exim->get("spool_directory");  | 
11 $exim->set_cmdline(-oMi => "1.1.1.1.22");  | 
12 print $exim->expand("\$received_port");  |