#!/usr/bin/env perl
use strict;

# name
# Script to extract "item 7" from a 10-K report.
# This will write the "good" part of the file to stdout, and will write
# a "schema string" on a single line to stderr.

    $dirtoget="/10K-txt/";