#!/bin/sh

find "$@" -path '*/CVS/Entries' | xargs grep -H '' | grep '^.*/CVS/Entries:/' |
sed 's#/CVS/Entries:/\([^/]*\)/#/\1'$'\t''#' |
perl -ne '($file,$rest)=split/\t/,$_; $rest=~tr#/#\t#; print"$file\t$rest"'
