Results for "Perl"

Wire posts

  • Rename the fasta name perl -ane 'if(/\>/){$a++; @foo = split /\s+/;$_ = join '_', @foo; print "$_\n"}else{print;}' your.fasta > new.fa #PerlTrick #PerlOneliner #Perl

    2782 days ago

  • Extract fasta sequence by Ids: perl -ne 'if(/^>(\S+)/){$c=grep{/^$1$/}qw(id1 id2)}print if $c' fasta.file #Perl #PerlOneliner #PerlTrick #Extract #Ids #Fasta

    2781 days ago

  • Extract sequence by using Ids file (assuming one ids in a line): perl -ne 'if(/^>(\S+)/){$c=$i{$1}}$c?print:chomp;$i{$_}=1 if @ARGV' ids.file fasta.file #PerlTricks #PerlOneliner #Perl #Extract #Ids #

    2781 days ago

  • Useful perl script http://homepages.ulb.ac.be/~dgonze/SCRIPTS/scripts.html #Perl #Script #Resource

    2763 days ago

  • A perl script for mapping fasta formated sequences to multiple reference sequences using one of several alignment programs. http://seq.crg.es/download/software/Miro/doc/run_Mapping.html #Perl #Script

    2763 days ago

  • Re-install perl in Ubuntu: sudo aptitude reinstall perl #Perl #Ubuntu #Install #Linux

    2741 days ago

  • Slice on the fly with perl: my ($username, $real_name) = (split /:/, $str)[0, 4]; #Perl #PerlTrick #Split

    2741 days ago

  • One code to find them all is a set of perl scripts to extract useful information from RepeatMasker http://doua.prabi.fr/software/one-code-to-find-them-all

    2733 days ago

  • Perl module upgrade on Linux: $ sudo cpan then cpan[1]> upgrade #Upgrade #Perl #Modules

    2718 days ago

  • Accept file from STDIN in Perl my $infh = \*STDIN; my $outfh = \*STDOUT #Perl #Tricks

    2690 days ago