open(IN, "<c:\doclist.chr") or die "Couldn't open file, $!";
open(OUT, ">c:\doclist.txt") or die "Couldn't open file, $!";