$ext{index} = 'pod';
  for my $pod (  qw( HostCycle Instinet index )  ) {
      system "pod2html $pod" . def($ext{$pod},".pm") . " > $pod.html";
  }