eval {
        local $SIG{ALRM} = sub { die "alarm clock restart" };
        alarm 10;
        qx/$string/;
        alarm 0;
    };
    if ($@ and $@ !~ /alarm clock restart/) { die }