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;