my $rpc;

unless( $rpc = $memory{"rpc_$args{frequency}"} ) {
    &uxmon::load_module( "rpc_ping" );
    &uxmon::checker(
	$memory{"rpc_$args{frequency}"} = $rpc = Monitor::rpc_ping->new( 2 )
    );
    $rpc->sched_frequency( $args{"frequency"} );
}

if( $args{"rpc"} ) {
    my $check;
    foreach $check (split(",",$args{"rpc"})) {
	$rpc->add_host( $args{"alias"}.".rpc", $args{"host"}, $check, $args{"version"}?$args{"version"}:1, $args{"proto"}?$args{"proto"}:"udp" );
    }
}
else {
    $rpc->add_host( $args{"alias"}.".rpc", $args{"host"}, $args{"cmd"}, $args{"version"}?$args{"version"}:1, $args{"proto"}?$args{"proto"}:"udp" );
}
