19 len = atoi(argv[a++]);
21 abort(); /* kind of drastic... */
22 for (i = 0; i < len; i++)
23 inmap[i] = atoi(argv[a++]);
24 if (atoi(argv[a++]) != len)
26 for (i = 0; i < len; i++)
27 outmap[i] = atoi(argv[a++]);
29 while (fread(in, 1, len, stdin) == len) {
30 for (i = 0; i < len; i++)
31 out[outmap[i]] = in[inmap[i]];
32 fwrite(out, 1, len, stdout);