«что» (из SCCS) действительно правильный ответ (спасибо Джонатан). Я надеялся найти современную кроссплатформенную версию «что», которая могла бы работать даже для двоичных файлов (например, «strings xfile | grep ...»). В настоящее время кажется, что «что» обычно все еще встречается только в Solaris.
Вот пример ...
$ cat foobar.c
/*
* @(#) foobar.c 9.04 (mn) 10/29/2009
*/
static const char * foobar = "@(#) some string";
int main(int argc, char *argv[]) { }
$ gcc foobar.c
$ what a.out foobar.c
a.out:
some string
SunOS 5.10 s10_69 December 2004
foobar.c:
foobar.c 9.04 (mn) 10/29/2009
some string
$ strings a.out | grep '@(#)'
@(#) some string
ps: я пытался опубликовать это как комментарий к правильному ответу Джонатана, но форматирование исходного кода не вполне сработало.