lib_Pod_Perldoc_ToMan.pm.ed   [plain text]

/my $command =/a
.
/^$/i

  if($render eq 'nroff') {
    my @renderpath = grep {-x "$_/nroff"} split(':', $ENV{PATH});
    $command .= ' -Tascii' if scalar(@renderpath) > 0 && $renderpath[0] eq '/usr/bin';
  }
.
w