home *** CD-ROM | disk | FTP | other *** search
/ PC Professionell 2004 December / PCpro_2004_12.ISO / files / webserver / tsw / TSW_3.4.0.exe / Apache2 / perl / cygwin.pm < prev    next >
Encoding:
Perl POD Document  |  2003-10-11  |  963 b   |  47 lines
  1. package Module::Build::Platform::cygwin;
  2.  
  3. use strict;
  4. use Module::Build::Platform::Unix;
  5.  
  6. use vars qw(@ISA);
  7. @ISA = qw(Module::Build::Platform::Unix);
  8.  
  9. sub link_c {
  10.   my ($self, $to, $file_base) = @_;
  11.   my ($cf, $p) = ($self->{config}, $self->{properties}); # For convenience
  12.   my $flags = $p->{extra_linker_flags};
  13.   local $p->{extra_linker_flags} = ['-L'.File::Spec->catdir($cf->{archlibexp}, 'CORE'),
  14.                     '-lperl',
  15.                     ref $flags ? @$flags : $self->split_like_shell($flags)];
  16.   return $self->SUPER::link_c($to, $file_base);
  17. }
  18.  
  19. sub manpage_separator {
  20.    '.'
  21. }
  22.  
  23. 1;
  24. __END__
  25.  
  26.  
  27. =head1 NAME
  28.  
  29. Module::Build::Platform::cygwin - Builder class for Cygwin platform
  30.  
  31. =head1 DESCRIPTION
  32.  
  33. This module provides some routines very specific to the cygwin
  34. platform.
  35.  
  36. Please see the L<Module::Build> for the general docs.
  37.  
  38. =head1 AUTHOR
  39.  
  40. Initial stub by Yitzchak Scott-Thoennes, sthoenna@efn.org
  41.  
  42. =head1 SEE ALSO
  43.  
  44. perl(1), Module::Build(3), ExtUtils::MakeMaker(3)
  45.  
  46. =cut
  47.