The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

tools/dev/extract_file_descriptions.pl - Extract descriptions from files

SYNOPSIS

    % perl tools/dev/extract_file_descriptions.pl [--plus-misses] [files ...]

DESCRIPTION

This script extracts descriptions from the Parrot source files. If no files are specified on the command-line then the files worth describing will be found recursively from the current directory.

Options

--plus-misses

This creates a second section, with the heads of any files which had familiar types, but from which descriptions were not obtained.

TO DO

  • Given a directory argument, should recursively descend.

  • Should create descriptive hashes earlier, before files are filtered. So one can skip, say a binary file, but still have it listed in the output. For instance, it is nice to see where the .pbc's land.

  • Allow indescribable heads to be mixed in with rest, for when exploring a location is more important than big-picture browsing.

  • Is absense of "[...]"s in the indescribable listing a ui consistency violation?

  • Fragment describe_file() - it shouldn't both `cat` and dispatch on file suffix.

  • Finish making this usable as a library.

  • It would be nice to have a ParrotSourceFile class of course. ;) (a jest - sort of.)

  • Misc: rationalize indent; clarify desc emptiness contract; review readability of intra-comment blank line elimination; pod handling;