p4raw-id: //depot/perl@14493
#!../../perl -w
BEGIN {
- unshift @INC, '../../lib';
- $ENV{PATH} .= ';../..' if $^O eq 'MSWin32';
+ unshift @INC, qw(../../lib ../../../lib);
+ $ENV{PATH} .= ';../..;../../..' if $^O eq 'MSWin32';
}
use strict;
use Getopt::Std;