Perl script to count occurrence of a character !
#!/usr/bin/env perl # -*- coding: utf-8 -*- #!/usr/bin/perl use strict; use warnings; my %count_of; while ( ) { my @val = split "\t", $_; #my ( $word) = m/(\w+)/; $count_of{$...1915 days ago
1848 days ago
1814 days ago
1776 days ago
Palindrome Simulation commands !
(base) ➜ palindromeAssemblySim more allCommands 3315 mutate....tant153CH101.fasta > allPalindromeSimulated.fa 3319 ~/Tool...250 -f 100 -m 300 -s 10 -o paired_dat 3321 ~/Tools/seqtk/s...assemble -o seePlatanus -f paired_dat[12].fq -t 101750 days ago
Resume the MIRA assembler run !
mira -r manifest_file Usage: mira [options] manifest_file [manifest_file...Options: -c / --cwd= directory Change working directory -r / --resume...-v / --version Print version and exit...1748 days ago
1739 days ago
1739 days ago
1737 days ago
Perl script to run in parellel !
#!/usr/bin/perl use strict; use warnings; use Parallel::ForkManager; use Bio::SeqIO; my ($sequence_data_ref) = parse_genome_files($ARGV...touch( "$chr_set.out", $chr_seq ); print "finished r...sequence_data{$accession_number}{problem_desc} = "-"; #everyb...1701 days ago