| changeset 3 | f501f512f8d3 |
| parent 2 | 93f3693c31a0 |
| child 4 | 6d58197d7719 |
| 2:93f3693c31a0 | 3:f501f512f8d3 |
|---|---|
22 |
22 |
23 use strict; |
23 use strict; |
24 use warnings; |
24 use warnings; |
25 |
25 |
26 use CGI; |
26 use CGI; |
27 |
|
28 #use Net::Sieve; |
|
29 use Net::ManageSieve; |
27 use Net::ManageSieve; |
30 |
28 |
31 my $host = 'localhost'; |
29 my $host = 'localhost'; |
32 my $verify_crt = 0; |
|
33 my $requiretls = 'require'; |
30 my $requiretls = 'require'; |
34 my $script_name = 'ius'; |
31 my $script_name = 'ius'; |
35 |
32 |
36 my $status = 'OK'; |
33 my $status = 'OK'; |
37 |
34 |