sub tu_was {
    my $arg = @_;
    ...
    tu_was($arg) unless flock FH, 2;
    ...
}