Select Code to Download

  sub def {
      $_[0]= def($_[1],"") if ! defined $_[0];
      return $_[0];
  }

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