# SubRoutine: sysrun
#
# Run System Command
sub sysrun {
        my ($command) =@_;
        my $ret_code;

        $ret_code = system("$command");
        if ( $ret_code == 0 ) {
                # Job suceeded
                $ret_code = 1;
        }
        else {
                # Job Failed
                $ret_code = 0;
        }
        return ($ret_code);
}