Skip to content

Instantly share code, notes, and snippets.

View meso-cacase's full-sized avatar

Yuki Naito meso-cacase

View GitHub Profile
@meso-cacase
meso-cacase / siDirect2crawl.pl
Created June 20, 2011 09:00
siDirect2crawl.pl
#!/usr/bin/perl
# README
#
# This script uses WWW::Mechanize to get siRNAs from siDirect 2.0 web server (http://siDirect2.RNAi.jp/).
# WWW::Mechanize module is available at CPAN.
#
# Usage:
# ./siDirect2crawl.pl sequence.txt
#
@meso-cacase
meso-cacase / grep_gbff.pl
Created May 31, 2011 02:44
grep_gbff.pl
#!/usr/bin/perl
# usage: zcat completeXXX.rna.gbff.gz ./grep_gbff.pl 'Homo sapiens'
use warnings ;
use strict ;
my $keyword = $ARGV[0] ;
$/ = "\n//\n" ;