system ("lockfile -2 -r 5 $base_dir/.lock" ) == 0 or diehtml("Lock
error: ", $? >> 8, "\n" ); # TODO stop stderr of system