find . -name "*.c" -exec cat {} \; |perl -ne 'print $1\n" if $_ =~ /(.*)\d+$/'