Skip to content

Instantly share code, notes, and snippets.

View cory-ko's full-sized avatar

Kazuki Oshita (cory) cory-ko

View GitHub Profile
@cory-ko
cory-ko / glinks.java
Created February 11, 2013 15:28
Sample script to access G-Links (http://link.g-language.org/) via Java.
@cory-ko
cory-ko / glinks.rb
Created February 11, 2013 09:04
Sample script to access G-Links (http://link.g-language.org/) via Ruby.
@cory-ko
cory-ko / glinks.py
Created February 11, 2013 09:04
Sample script to access G-Links (http://link.g-language.org/) via Python.
@cory-ko
cory-ko / glinks.pl
Last active December 12, 2015 09:39
Sample script to submit sequence data to G-Links (http://link.g-language.org/) with feeling lucky (-direct = 1).
#!/usr/bin/env perl
use strict;
use warnings;
while (<DATA>) {
chomp;
print "$_\n" if ( /^_START_$/ .. /^_END_$/ );
}
__END__
@cory-ko
cory-ko / range_operator.pl
Created December 11, 2012 08:38
Sample script for range operator in "if" section.
#!/usr/bin/env perl
use strict;
use warnings;
while (<DATA>) {
chomp;
print "$_\n" if ( /^_START_$/ .. /^_END_$/ );
}
__END__
@cory-ko
cory-ko / sfc-room.pl
Created November 12, 2012 03:15
Sample script to use SFC::Room
#!/usr/bin/env perl
use strict;
use warnings;
use SFC::Room;
my $rooms = SFC::Room->new();
my $delta = $rooms->parse('ΔS113');
print $delta->string,"\n"; # デルタS113