7 "Usage: doxygrep <re> [<file>...]\n".
9 "Greps for <re> only within doxygen comments in [files] or stdin\n";
14 while(m{/\*\*<?(.*?)\*/|///<?(.*?)$}smg) {
21 ($tt = $&.$ppost)=~s/\n.*$//s;
22 $n = ($ppre =~ tr{\n}{\n})+1;
25 print "$ARGV:$n:$m:$ppre$tt\n";