diff options
Diffstat (limited to 'emi')
-rwxr-xr-x | emi | 9 |
1 files changed, 8 insertions, 1 deletions
@@ -27,7 +27,7 @@ # use strict; -use Iurt::Config qw(config_usage get_date); +use Iurt::Config qw(config_usage get_date config_init); my $program_name = 'emi'; my %run; @@ -59,4 +59,11 @@ config_usage(\%config_usage, $config) if $run{config_usage}; print {$run{LOG}} "$program_name\n"; +config_init(\%config_usage, $config, \%run); + +$run{pidfile_home} = $config->{tmp}; +$run{pidfile} = "ulri"; +my $pidfile = check_pid(\%run); + + exit |