Loading bin/prokka +6 −6 Original line number Diff line number Diff line Loading @@ -45,7 +45,7 @@ my @CMDLINE = ($0, @ARGV); my $OPSYS = $^O; my $BINDIR = "$FindBin::RealBin/../binaries/$OPSYS"; my $EXE = $FindBin::RealScript; my $VERSION = "1.13.3"; my $VERSION = "1.13.7"; my $AUTHOR = 'Torsten Seemann <torsten.seemann@gmail.com>'; my $URL = 'https://github.com/tseemann/prokka'; my $PROKKA_PMID = '24642063'; Loading Loading @@ -86,8 +86,8 @@ my $BIDEC = '(\d+\.\d+)'; # pattern of NN.NN for versions that can be compared my %tools = ( 'parallel' => { GETVER => "parallel --version | grep '^GNU parallel 2'", REGEXP => qr/GNU parallel (\d+)/, GETVER => "parallel --version | grep -E 'parallel 2[0-9]{7}\$'", REGEXP => qr/parallel (\d+)/, MINVER => "20130422", NEEDED => 1, }, Loading Loading @@ -156,13 +156,13 @@ my %tools = ( 'blastp' => { GETVER => "blastp -version", REGEXP => qr/blastp:\s+($BIDEC)/, MINVER => "2.2", MINVER => "2.8", NEEDED => 1, }, 'makeblastdb' => { GETVER => "makeblastdb -version", REGEXP => qr/makeblastdb:\s+($BIDEC)/, MINVER => "2.2", MINVER => "2.8", NEEDED => 0, # only if --proteins used }, 'tbl2asn' => { Loading Loading @@ -1342,7 +1342,7 @@ for my $sid (@seq) { $count{ $f->primary_tag }++; } } for my $ft (keys %count) { for my $ft (sort keys %count) { printf "%s: %d\n", $ft, $count{$ft}; } Loading Loading
bin/prokka +6 −6 Original line number Diff line number Diff line Loading @@ -45,7 +45,7 @@ my @CMDLINE = ($0, @ARGV); my $OPSYS = $^O; my $BINDIR = "$FindBin::RealBin/../binaries/$OPSYS"; my $EXE = $FindBin::RealScript; my $VERSION = "1.13.3"; my $VERSION = "1.13.7"; my $AUTHOR = 'Torsten Seemann <torsten.seemann@gmail.com>'; my $URL = 'https://github.com/tseemann/prokka'; my $PROKKA_PMID = '24642063'; Loading Loading @@ -86,8 +86,8 @@ my $BIDEC = '(\d+\.\d+)'; # pattern of NN.NN for versions that can be compared my %tools = ( 'parallel' => { GETVER => "parallel --version | grep '^GNU parallel 2'", REGEXP => qr/GNU parallel (\d+)/, GETVER => "parallel --version | grep -E 'parallel 2[0-9]{7}\$'", REGEXP => qr/parallel (\d+)/, MINVER => "20130422", NEEDED => 1, }, Loading Loading @@ -156,13 +156,13 @@ my %tools = ( 'blastp' => { GETVER => "blastp -version", REGEXP => qr/blastp:\s+($BIDEC)/, MINVER => "2.2", MINVER => "2.8", NEEDED => 1, }, 'makeblastdb' => { GETVER => "makeblastdb -version", REGEXP => qr/makeblastdb:\s+($BIDEC)/, MINVER => "2.2", MINVER => "2.8", NEEDED => 0, # only if --proteins used }, 'tbl2asn' => { Loading Loading @@ -1342,7 +1342,7 @@ for my $sid (@seq) { $count{ $f->primary_tag }++; } } for my $ft (keys %count) { for my $ft (sort keys %count) { printf "%s: %d\n", $ft, $count{$ft}; } Loading