Changeset 24223 for main/trunk/greenstone2/bin/script/gsConvert.pl

Timestamp:

2011-07-04T15:01:03+12:00 (13 years ago)

Author:

ak19

Message:

More changes to do with obtaining the perlpath using Config: moved the Use Config statement into the Begin block (it cannot be a Require statement for some reason).

File:

• main/trunk/greenstone2/bin/script/gsConvert.pl (modified) (2 diffs)

main/trunk/greenstone2/bin/script/gsConvert.pl

@@ -49 +49 @@
 
     if(!$ENV{'PERLPATH'}) {
-    my $full_perl_exec = $Config{perlpath}; #$^X;
+    use Config; # for some reason, this can't be a require statement
+    my $full_perl_exec = $Config{perlpath}; #$^X;   
     require File::Basename;
     my $perl_path = File::Basename::dirname($full_perl_exec);
@@ -62 +63 @@
 use util;
 use Cwd;
-use Config; # for getting the perlpath in the recommended way
+#use Config; # for getting the perlpath in the recommended way
 # Note: even though this (and other) use statement comes after its
 # usage in BEGIN, the use statement is in fact executed before BEGIN.
+# Doesn't work here for Greenstone 3.