Select Code to Download

package GetRidOfOracle;

...
@INC=grep { !isOracleDirectory($_) } @INC; 

1;

#!/usr/bin/perl
# ^- Change perl path and parameters as needed
...
# For a demo, set PERL5LIB as Oracle would do, then run this script.
# No Oracle directory should be printed as long as GetRidOfOracle is l
+oaded.
say for @INC;

#!/usr/bin/perl
# ^- Change perl path and parameters as needed
...
# For a demo, set PERL5LIB as Oracle would do, then run this script.
# No Oracle directory should be printed as long as GetRidOfOracle is l
+oaded.
print "$_\n" for @INC;