BOL: Wire posts tagged with 'Perl'

Wire post by Abhimanyu Singh

Abhimanyu Singh — Mon, 06 Mar 2017 05:36:42 -0600

sudo apt-get install libgd-svg-perl to install GD::SVG #Perl #Linux #Install #Graph #Plot

Wire post by Shruti Paniwala

Shruti Paniwala — Wed, 01 Mar 2017 17:55:34 -0600

Remove all blank lines from file. perl -i.bak -n -e "print if /\S/" ../finalSample.fa #Perl #Tricks #PerlOneliner

Wire post by Jit

Jit — Fri, 24 Feb 2017 05:12:34 -0600

Testing Random Dice Rolls http://blogs.perl.org/users/ovid/2014/01/testing-random-dice-rolls.html #Perl #Random #Test #Randomness #Dice

Wire post by Jit

Jit — Mon, 20 Feb 2017 10:27:20 -0600

The easy way to #build stand-alone #Perl #apps http://perltricks.com/article/58/2014/1/5/The-easy-way-to-build-stand-alone-Perl-apps/

Wire post by Jit

Jit — Wed, 08 Feb 2017 14:22:42 -0600

Perl6 editor https://github.com/azawawi/atom-perl6-editor-tools #Perl #Editor

Wire post by Jit

Jit — Mon, 06 Feb 2017 05:14:06 -0600

while (!eof(IN)) { } #Perl #Trick

Wire post by Jit

Jit — Fri, 16 Dec 2016 04:15:18 -0600

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

Wire post by Jit

Jit — Fri, 18 Nov 2016 08:29:13 -0600

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

Wire post by Shruti Paniwala

Shruti Paniwala — Wed, 26 Oct 2016 12:43:58 -0500

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

Wire post by Shruti Paniwala

Shruti Paniwala — Wed, 26 Oct 2016 11:22:55 -0500

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

Wire post by Jit

Jit — Tue, 04 Oct 2016 14:48:31 -0500

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

Wire post by Abhimanyu Singh

Abhimanyu Singh — Tue, 04 Oct 2016 07:48:36 -0500

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

Wire post by Radha Agarkar

Radha Agarkar — Fri, 16 Sep 2016 03:00:15 -0500

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 #

Wire post by Radha Agarkar

Radha Agarkar — Fri, 16 Sep 2016 02:57:36 -0500

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

Wire post by Shruti Paniwala

Shruti Paniwala — Thu, 15 Sep 2016 11:15:56 -0500

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