my $sec = 600; $jt->log_c( __LINE__ .':'. (caller(0))[3] ." sleep $sec s" ); sleep $sec;