# print include files for SSI

sub printIncludes {

 for my $incHandle ( keys %anchors ) {
  for my $status ( keys %{ $anchors{$incHandle} } ) {

 print $incHandle "@{ $anchors{$incHandle}{$status} }\n";

    }
  }
}