+if ($ARGS{PLATFORM} =~ /^win(?:32|ce)$/) {
+ my $dll = $define{PERL_DLL} ? $define{PERL_DLL} =~ s/\.dll$//ir
+ : "perl$Config{api_revision}$Config{api_version}";
+ print "LIBRARY $dll\n";
+ # The DESCRIPTION module definition file statement is not supported
+ # by VC7 onwards.
+ if ($ARGS{CCTYPE} =~ /^(?:MSVC60|GCC|BORLAND)$/) {
+ print "DESCRIPTION 'Perl interpreter'\n";
+ }
+ print "EXPORTS\n";
+}
+elsif ($ARGS{PLATFORM} eq 'os2') {
+ (my $v = $]) =~ s/(\d\.\d\d\d)(\d\d)$/$1_$2/;
+ $v .= '-thread' if $Config{archname} =~ /-thread/;
+ (my $dll = $define{PERL_DLL}) =~ s/\.dll$//i;
+ $v .= "\@$Config{perl_patchlevel}" if $Config{perl_patchlevel};
+ my $d = "DESCRIPTION '\@#perl5-porters\@perl.org:$v#\@ Perl interpreter, configured as $Config{config_args}'";
+ $d = substr($d, 0, 249) . "...'" if length $d > 253;
+ print <<"---EOP---";
+LIBRARY '$dll' INITINSTANCE TERMINSTANCE
+$d
+STACKSIZE 32768
+CODE LOADONCALL
+DATA LOADONCALL NONSHARED MULTIPLE
+EXPORTS
+---EOP---
+}
+elsif ($ARGS{PLATFORM} eq 'aix') {
+ my $OSVER = `uname -v`;
+ chop $OSVER;
+ my $OSREL = `uname -r`;
+ chop $OSREL;
+ if ($OSVER > 4 || ($OSVER == 4 && $OSREL >= 3)) {
+ print "#! ..\n";
+ } else {
+ print "#!\n";
+ }
+}
+elsif ($ARGS{PLATFORM} eq 'netware') {
+ if ($ARGS{FILETYPE} eq 'def') {
+ print "LIBRARY perl$Config{api_revision}$Config{api_version}\n";
+ print "DESCRIPTION 'Perl interpreter for NetWare'\n";
+ print "EXPORTS\n";
+ }