Perl script to check modules installed !
#use strict; use warnings; use ExtUtils::Installed; # # First, check if all the required modules have been installed in the system # BEGIN { my @import_m...1169 days ago
1068 days ago
Install grabseqs using conda !
vik@vik-Lenovo-ideapad-320-15ISK:~/Downloads/setu/setu$ conda install grabseqs -c louiejtaylor -c bioconda -c conda-forge Collecting package metadata (current_repodata.json): done Solving environment: done ==> WARNING: A newer version of conda exists.1068 days ago
Perl onliner to print fasta headers !
#Save all your fasta in seq.fa and run the following ... perl -ne 'print if /^>/' seq.fa #Print header with line number perl -ne 'print "$. $_" if /^>/ ' seq.fa1010 days ago
Oneliner to convert lower-case to sequence masked with Ns
perl -pe '/^[^>]/ and $_=~ s/[a-z]/N/g' genomic.fna > genomic.N-masked.fna awk '{if(/^[^>]/)gsub(/[a-z]/,"N");print $0}' genomic.fna > genomic.N-masked.fna964 days ago
Perl script for Smith-Waterman Algorithm
# Smith-Waterman Algorithm # usage statement die "usage: $0 \n" unless @ARGV == 2; # get sequences from command line my ($seq1, $seq2) = @ARGV; # scoring...964 days ago
Perl onliner to check the ids in two files !
perl -lane 'BEGIN{open(A,"ids2.txt"); while(){chomp; $k{$_}++}} if (defined($k{$F[0]})) {print "$_\t$F[0]\t1"} else {print "$_\tNA\t0"}; ' ids1.txt > aaa.xls941 days ago
Installing Covid19 Environment !
...############################################################### | 100% perl-xml-parser-2.44 | 165 KB |...############################################################### | 100% perl-gd-2.68 | 112 KB |...937 days ago
Perl script to rename the fasta file !
#Script #1 #!/usr/bin/perl -w use strict; #USAGE #perl extractPattern.pl kmerfasta > uniref100_result_broad my %kHash; local $/ = '>'; my $infile2 = "$ARGV[0]"; # Kmer fasta open( FH2, '872 days ago
Extract all fasta sequences except ids !
...d.txt > omi_kmer19.fa #reformat to 19mer reformat.sh in=omi_kmer19.fa out=omi_kmer19_formated.fa fastawrap=19 #Extract and number the kmers perl storeKmer.pl omi_kmer19_forma...842 days ago