recoll/bin/rcl

   1 #!/bin/sh
   2
   3 recollq -A "$@" 2>/dev/null | perl -ne '
   4     if (/^ABSTRACT/../^\/ABSTRACT/) {
   5         print "\t$_" unless /^.?ABSTRACT/;
   6         next;
   7     };
   8     next unless /^(.*)\t\[file:\/\/(.*)\]\t\[.*\]\t\d+\t.*\t.*$/;
   9     print "$2\t$1\n";
  10 ' | spc -e grn,"(^/.*)"