diff --git a/perl/reports/1KG/AssembleSlides.pl b/perl/reports/1KG/AssembleSlides.pl
index d33d7b4a6..a6ab31787 100755
--- a/perl/reports/1KG/AssembleSlides.pl
+++ b/perl/reports/1KG/AssembleSlides.pl
@@ -1,7 +1,9 @@
 #!/usr/bin/perl -w
 
 use strict;
-use lib "$ENV{'STING_DIR'}/perl";
+use FindBin;
+use lib "$FindBin::Bin/../../";
+
 use StingArgs;
 
 my %args = &getCommandArguments("DIR" => undef, "OUT" => undef);
diff --git a/perl/reports/1KG/GenerateDataProcessingReport.pl b/perl/reports/1KG/GenerateDataProcessingReport.pl
index 4e837935a..172e020fb 100755
--- a/perl/reports/1KG/GenerateDataProcessingReport.pl
+++ b/perl/reports/1KG/GenerateDataProcessingReport.pl
@@ -1,7 +1,9 @@
 #!/usr/bin/perl -w
 
 use strict;
-use lib "$ENV{'STING_DIR'}/perl";
+use FindBin;
+use lib "$FindBin::Bin/../../";
+
 use StingArgs;
 use DistributedMake;
 use DataTable;
diff --git a/perl/reports/1KG/GenerateDataProcessingReport2.pl b/perl/reports/1KG/GenerateDataProcessingReport2.pl
index 83943afe6..dd3ed7bc9 100755
--- a/perl/reports/1KG/GenerateDataProcessingReport2.pl
+++ b/perl/reports/1KG/GenerateDataProcessingReport2.pl
@@ -1,7 +1,9 @@
 #!/usr/bin/perl -w
 
 use strict;
-use lib "$ENV{'STING_DIR'}/perl";
+use FindBin;
+use lib "$FindBin::Bin/../../";
+
 use StingArgs;
 use DistributedMake;
 use DataTable;
diff --git a/perl/reports/1KG/GetSNPsPerSample.pl b/perl/reports/1KG/GetSNPsPerSample.pl
index 8fa430649..191681ced 100755
--- a/perl/reports/1KG/GetSNPsPerSample.pl
+++ b/perl/reports/1KG/GetSNPsPerSample.pl
@@ -1,7 +1,9 @@
 #!/usr/bin/perl -w
 
 use strict;
-use lib "$ENV{'STING_DIR'}/perl";
+use FindBin;
+use lib "$FindBin::Bin/../../";
+
 use StingArgs;
 
 my %args = &getCommandArguments("VCF" => undef, "OUT" => "/dev/stdout");
diff --git a/perl/reports/1KG/MakeDPRSlides.pl b/perl/reports/1KG/MakeDPRSlides.pl
index 71bb0c472..302056e12 100755
--- a/perl/reports/1KG/MakeDPRSlides.pl
+++ b/perl/reports/1KG/MakeDPRSlides.pl
@@ -1,7 +1,9 @@
 #!/usr/bin/perl -w
 
 use strict;
-use lib "$ENV{'STING_DIR'}/perl";
+use FindBin;
+use lib "$FindBin::Bin/../../";
+
 use StingArgs;
 use File::Basename;
 use DistributedMake;
diff --git a/perl/reports/1KG/MakeTopSheetSlide.pl b/perl/reports/1KG/MakeTopSheetSlide.pl
index db46ed841..6fad34610 100755
--- a/perl/reports/1KG/MakeTopSheetSlide.pl
+++ b/perl/reports/1KG/MakeTopSheetSlide.pl
@@ -1,7 +1,9 @@
 #!/usr/bin/perl -w
 
 use strict;
-use lib "$ENV{'STING_DIR'}/perl";
+use FindBin;
+use lib "$FindBin::Bin/../../";
+
 use StingArgs;
 use DistributedMake;
 use DataTable;
diff --git a/perl/reports/1KG/MakeVennSlide.pl b/perl/reports/1KG/MakeVennSlide.pl
index 216ebc357..4357f3991 100755
--- a/perl/reports/1KG/MakeVennSlide.pl
+++ b/perl/reports/1KG/MakeVennSlide.pl
@@ -1,7 +1,9 @@
 #!/usr/bin/perl -w
 
 use strict;
-use lib "$ENV{'STING_DIR'}/perl";
+use FindBin;
+use lib "$FindBin::Bin/../../";
+
 use StingArgs;
 use DistributedMake;
 use Data::Dumper;
diff --git a/perl/reports/1KG/RenderTemplate.pl b/perl/reports/1KG/RenderTemplate.pl
index 19f9fb30d..8b980b247 100755
--- a/perl/reports/1KG/RenderTemplate.pl
+++ b/perl/reports/1KG/RenderTemplate.pl
@@ -1,7 +1,9 @@
 #!/usr/bin/perl -w
 
 use strict;
-use lib "$ENV{'STING_DIR'}/perl";
+use FindBin;
+use lib "$FindBin::Bin/../../";
+
 use StingArgs;
 use Data::Dumper;