Help for this page
get_status("@SERVERS[$rev_srv_num{$SERVER}]->[2]","$SERVER");
my $print_subsystem=shift; # chomp ($print_subsystem); # not needed my $server_name=shift;