eval {
        alarm(9000);
        $expect_flg = $expect_flg + 1;
        $file = "$workdir/$clli.log";
        system($pb_dms, $datakit, $workdir, $file);
        alarm(0);
        $expect_flg = 0;
    };