[oak perl] Making Activestate Perl & Cygwin perl play nicely

Belden Lyman blyman at iii.com
Fri Sep 12 12:59:41 CDT 2003



Belden Lyman wrote:
> 
> Hmm, I always[1] 'use strict' and 'use warnings', so maybe I
> should change both perls' strict.pm manipulate @INC the way I
> want it to be... thoughts? Horrified reactions? Better
> suggestions?
> 

At the head of both perls' strict.pm, I injected:

	BEGIN {
	  if( $^O eq 'cygwin' ) {
	    splice @INC, -1, -1, qw#
	      C:/Perl/lib
	      C:/Perl/site/lib
	    #;
	  }
	  elsif ( $^O eq 'MSWin32' ) {
	    splice @INC, -1, -1, qw#
	      c:/cygwin/lib/perl5/5.8.0/cygwin-multi-64int
	      c:/cygwin/lib/perl5/5.8.0
	      c:/cygwin/lib/perl5/site_perl/5.8.0/cygwin-multi-64int
	      c:/cygwin/lib/perl5/site_perl/5.8.0
	      c:/cygwin/lib/perl5/site_perl
	    #;
	  }
	}

Better suggestions still welcome :) It's nice to know that this
is working though:

	$ perl -MRTF::Parser -e 1
	Can't locate RTF/Parser.pm in @INC (@INC contains: blah)
	BEGIN failed--compilation aborted.

	$ perl -Mstrict -MRTF::Parser -e 1

Hmm, maybe I'd better remove the cygwin-multi-64int's from that
second list though...

Belden




More information about the Oakland mailing list