my $outfile = "$rootpath$categoryDir$frontPage";
open(TXTFILE, ">", $outfile )
  or die "Can't open output file '$outfile': $!\n";