perl -pe"s/^</#EOF\ncat<<'#EOF'>/" large_file | sh