Added --version option for rsem-calculate-expression

diff --git a/convert-sam-for-rsem b/convert-sam-for-rsem
index decf86195f25d65a9cdacddb98d272d25c160df3..7d60f70974fa7db3dc1b96d615771bd7c23b1206 100755 (executable)
--- a/convert-sam-for-rsem
+++ b/convert-sam-for-rsem
@@ -87,7 +87,7 @@ sub runCommand {
     if ($status != 0) { 
        my $errmsg;
        if (scalar(@_) > 1) { $errmsg = $_[1]; }
-       else { $errmsg = "\"$command\" failed! Plase check if you provide correct parameters/options for the pipeline!"; }
+       else { $errmsg = "\"$command\" failed! Please check if you provide correct parameters/options for the pipeline!"; }
        print $errmsg."\n";
        exit(-1);
     }

diff --git a/rsem-calculate-expression b/rsem-calculate-expression
index f16975545d37dd64e589197b5a2be70d39b596dc..4d1b70a8a4dca169ccb0702caf32d2bb30caaa2f 100755 (executable)
--- a/rsem-calculate-expression
+++ b/rsem-calculate-expression
@@ -62,6 +62,8 @@ my $keep_intermediate_files = 0;
 
 my $strand_specific = 0;
 
+my $version = 0;
+
 my $mTime = 0;
 my ($time_start, $time_end, $time_alignment, $time_rsem, $time_ci) = (0, 0, 0, 0, 0);
 
@@ -105,11 +107,14 @@ GetOptions("keep-intermediate-files" => \$keep_intermediate_files,
           "calc-ci" => \$calcCI,
           "ci-memory=i" => \$NMB,
           "time" => \$mTime,
+          "version" => \$version,
           "q|quiet" => \$quiet,
           "h|help" => \$help) or pod2usage(-exitval => 2, -verbose => 2);
 
-pod2usage(-verbose => 2) if ($help == 1);
+my ($fn, $dir, $suf) = fileparse($0);
 
+pod2usage(-verbose => 2) if ($help == 1);
+&showVersionInfo($dir) if ($version == 1);
 
 #check parameters and options
 
@@ -186,7 +191,6 @@ my ($mate_minL, $mate_maxL) = (1, $maxL);
 
 if ($bowtie_path ne "") { $bowtie_path .= "/"; }
 
-my ($fn, $dir, $suf) = fileparse($0);
 my $command = "";
 
 if (!$is_sam && !$is_bam) {
@@ -350,7 +354,7 @@ sub runCommand {
     if ($status != 0) {
         my $errmsg = "";
         if (scalar(@_) > 1) { $errmsg .= $_[1]."\n"; }
-        $errmsg .= "\"$_[0]\" failed! Plase check if you provide correct parameters/options for the pipeline!\n";
+        $errmsg .= "\"$_[0]\" failed! Please check if you provide correct parameters/options for the pipeline!\n";
         print $errmsg;
         exit(-1);
     }
@@ -405,6 +409,16 @@ sub collectResults {
     close(OUTPUT);
 }
 
+# dir
+sub showVersionInfo {
+    open(INPUT, "$_[0]\WHAT_IS_NEW");
+    my $line = <INPUT>;
+    chomp($line);
+    close(INPUT);
+    print "$line\n";
+    exit(0);
+}
+
 __END__
 
 =head1 NAME

diff --git a/rsem-generate-ngvector b/rsem-generate-ngvector
index 99498c087d6240702abfcd40686373fdb1c92810..fc97b84e83dfdb058ef2bbe048b56cfc68342507 100755 (executable)
--- a/rsem-generate-ngvector
+++ b/rsem-generate-ngvector
@@ -30,7 +30,7 @@ sub runCommand {
     if ($status != 0) {
         my $errmsg = "";
         if (scalar(@_) > 1) { $errmsg .= $_[1]."\n"; }
-        $errmsg .= "\"$_[0]\" failed! Plase check if you provide correct parameters/options for the pipeline!\n";
+        $errmsg .= "\"$_[0]\" failed! Please check if you provide correct parameters/options for the pipeline!\n";
         print $errmsg;
         exit(-1);
     }

diff --git a/rsem-plot-transcript-wiggles b/rsem-plot-transcript-wiggles
index 37c7e270540667222142600ccc00a5b6258bfc03..46a71aaee21ea7abc7d45533db12b93812c7230a 100755 (executable)
--- a/rsem-plot-transcript-wiggles
+++ b/rsem-plot-transcript-wiggles
@@ -54,7 +54,7 @@ sub runCommand {
     if ($status != 0) { 
        my $errmsg;
        if (scalar(@_) > 1) { $errmsg = $_[1]; }
-       else { $errmsg = "\"$command\" failed! Plase check if you provide correct parameters/options for the pipeline!"; }
+       else { $errmsg = "\"$command\" failed! Please check if you provide correct parameters/options for the pipeline!"; }
        print $errmsg."\n";
        exit(-1);
     }

diff --git a/rsem-prepare-reference b/rsem-prepare-reference
index 56d6972d12ad99f3cecceda21c6dfbc6133feebd..055bef8c0bd7ff45b7aa494f100ef4eba1ca9dbd 100755 (executable)
--- a/rsem-prepare-reference
+++ b/rsem-prepare-reference
@@ -100,7 +100,7 @@ sub runCommand {
     if ($status != 0) {
         my $errmsg = "";
         if (scalar(@_) > 1) { $errmsg .= $_[1]."\n"; }
-        $errmsg .= "\"$_[0]\" failed! Plase check if you provide correct parameters/options for the pipeline!\n";
+        $errmsg .= "\"$_[0]\" failed! Please check if you provide correct parameters/options for the pipeline!\n";
         print $errmsg;
         exit(-1);
     }