Something

svn log -qv | perl -nle 'next unless m#^r(\d+)|^\s+D (/path/to/file)#; print $r and last if $2; $r = $1'