From 3b2add365dec75ec883de3903920ea1928e98441 Mon Sep 17 00:00:00 2001
From: Brandi Cantarel <brandi.cantarel@utsouthwestern.edu>
Date: Tue, 21 Jul 2020 20:52:00 -0500
Subject: [PATCH] perl script error

---
 genect_rnaseq/fpkm_subset_panel.pl | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/genect_rnaseq/fpkm_subset_panel.pl b/genect_rnaseq/fpkm_subset_panel.pl
index 4c37da5..b7c2d41 100755
--- a/genect_rnaseq/fpkm_subset_panel.pl
+++ b/genect_rnaseq/fpkm_subset_panel.pl
@@ -1,15 +1,13 @@
 #!/bin/bin/perl
-use strict;
-use warnings;
 use diagnostics;
 use Getopt::Long;
 
 
-my ($genelist,$fpkm_file) = ("") x 2;
+my ($genelist,$fpkm_file,$geneinfo) = ("") x 3;
 
 GetOptions( 'g|genes=s' => \$genelist,
             'f|fpkm=s' => \$fpkm_file,
-	    'i|geneinfo=s'=> \$refinfo);
+	    'i|geneinfo=s'=> \$geneinfo);
 
 my $fpkm_out = $fpkm_file;
 $fpkm_out =~ s/\.fpkm.+txt/\.fpkm.capture.txt/;
-- 
GitLab