+ if ($args{src} =~ /\.html$/) {
+ my $title = basename($args{src}, ".html");
+ my $pod = $args{generator}->[0];
+ return <<"EOF";
+$args{src}: $pod
+ pipe pod2html "--podroot=\$(SRCDIR)/doc" --htmldir=.. -
+ --podpath=man1:man3:man5:man7 "--infile=$pod" -
+ "--title=$title" -
+ | \$(PERL) -pe "s|href=""http://man\\.he\\.net/(man\d/[^""]+)(?:\\.html)?""|href=""../\$1.html|g;" -
+ > \$\@
+EOF
+ } elsif (platform->isdef($args{src})) {
+ my $target = platform->def($args{src});
+ my $mkdef = sourcefile('util', 'mkdef.pl');
+ my $ord_ver = $args{intent} eq 'lib' ? ' --version $(VERSION)' : '';
+ my $ord_name =
+ $args{generator}->[1] || basename($args{product}, '.EXE');
+ my $case_insensitive =
+ $target{$args{intent}.'_cflags'} =~ m|/NAMES=[^/]*AS_IS|i
+ ? '' : ' --case-insensitive';
+ return <<"EOF";
+$target : $args{generator}->[0] $deps $mkdef
+ \$(PERL) $mkdef$ord_ver --ordinals $args{generator}->[0] --name $ord_name "--OS" "VMS"$case_insensitive > $target
+EOF
+ } elsif (!platform->isasm($args{src})) {
+ my $target = $args{src};