main()
{
int fh;
int chr;

    if (run("fetch", "fetch.lst", 2) > 0) {
        return(1);
    }

    fh = fopen("select.tmp", "r");
    if (fh == 0) {
        return(1);
    }

    chr = fgetc(fh);
    while (!feof(fh)) {
        cputc(chr);
        chr = fgetc(fh);
    }
    fclose(fh);

}