Previous changeset 2:fa8566bd4a51 (2014-09-25) Next changeset 4:92207f2ec144 (2014-09-25) |
Commit message:
syntax error in perl script |
modified:
DC_Genotyper.pl |
b |
diff -r fa8566bd4a51 -r 61b6d523acd9 DC_Genotyper.pl --- a/DC_Genotyper.pl Thu Sep 25 05:34:01 2014 -0400 +++ b/DC_Genotyper.pl Thu Sep 25 05:36:54 2014 -0400 |
[ |
@@ -110,7 +110,7 @@ elsif (!-e "$snpfile.tbi") { print "tabix index file is missing for '$snpfile'. creating now.\n"; ## check if I can write it out for future use - $snpfile =~ m/(.*)/([^\/]+)$/; + $snpfile =~ m/(.*)([^\/]+)$/; my $d = $1; if (-w $d) { open OUT, ">$d/lock"; |