run
branchng
changeset 6 31f1e0c6344d
parent 5 2407e371ec7a
child 7 2492cea31acd
equal deleted inserted replaced
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");