$path =~ s{ /log/ .* \z }{/}xms;

##</code><code>##

$path =~ s{ (.*) /log/ .* \z }{$1/}xms;