Help for this page
#!/usr/bin/perl ... } print STDOUT @buf1; close filename;
The file it reads the terms from looks like. .END##SPLIT##.ENDTAGHERE\t \t##SPLIT##TAGMARKHERE