svn info | perl -ne 'chomp; print "$1-$2" if  /^URL: .+:\/\/.+\/(branches|tags|trunk)\/([^\/]+)/; print "-r$1\n" if /^Revision: (\d+)/;'