$Lang::tr{'services'} | $Lang::tr{'status'} | PID | $Lang::tr{'memory'} |
"; print %link->{$key}; print " | \n"; }else{ print "|||
"; print %link->{$key}; print " | \n"; } my $shortname = $servicenames{$key}; my $status = &isrunning($shortname); print "$status\n"; print "