KOBAYASHI Kenichi niratama
🐱
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| package MySub; | |
| use strict; | |
| use warnings; | |
| use MySub2; | |
| sub callback { | |
| print "in MySub::callback($_[0])\n"; | |
| } |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| package main | |
| import ( | |
| "fmt" | |
| "reflect" | |
| "time" | |
| "strconv" | |
| "regexp" | |
| ) |
niratama
/ twpicdl.sh
Last active
November 26, 2019 11:46
— forked from marbocub/twpicdl.sh
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/bin/sh | |
| # Modified by Stan Schwertly to download locally rather than to send to Posterous. | |
| # Github: http://github.com/Stantheman/Twitpic-Backup | |
| # Copyright 2010 Tim "burndive" of http://burndive.blogspot.com/ | |
| # This software is licensed under the Creative Commons GNU GPL version 2.0 or later. | |
| # License informattion: http://creativecommons.org/licenses/GPL/2.0/ | |
| # This script is a derivative of the original, obtained from here: |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| package main | |
| import ( | |
| "fmt" | |
| "log" | |
| "net/http" | |
| "github.com/skratchdot/open-golang/open" | |
| ) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| package main | |
| import ( | |
| "encoding/json" | |
| "fmt" | |
| "io/ioutil" | |
| "net/http" | |
| "strconv" | |
| ) |
niratama
/ kirisute_gomen.pl
Last active
August 29, 2015 14:01
— forked from ayumu83s/kirisute_gomen.pl
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| use utf8; | |
| use strict; | |
| use warnings; | |
| use Encode qw(encode_utf8 decode_utf8); | |
| # 文字が指定のバイト数を超えている場合に切り取る。 | |
| sub kirisute_gomen { | |
| my ($string, $byte_len, $str_len) = @_; | |
| return $string if (length(encode_utf8($string)) <= $byte_len && length($string) <= $str_len); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| // ==UserScript== | |
| // @name futaPoサムネイル拡大 | |
| // @namespace http://nira.poi.jp/userscript/futapo.user.js | |
| // @version 0.0.3 | |
| // @description futaPoのサムネイルを拡大します | |
| // @includes http://futakuro.com/futapo/* | |
| // @excludes | |
| // ==/UserScript== | |
| // | |
| (function (callback) { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <?xml version="1.0" encoding="UTF-8"?> | |
| <?xml-stylesheet type="text/xsl" href="test.xsl"?> | |
| <article title="hello!"> | |
| <content><![CDATA[ | |
| <div style="text-align: center;">Hello, world!</div> | |
| ]]></content> | |
| </article> |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/usr/bin/env perl | |
| use Mojolicious::Lite; | |
| get '/' => sub { | |
| my $self = shift; | |
| $self->render('index'); | |
| }; | |
| # XMLHttpRequest Streaming | |
| get '/stream' => sub { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| diff --git a/perl-Net-HandlerSocket/HandlerSocket.xs b/perl-Net-HandlerSocket/HandlerSocket.xs | |
| index d0aaaa3..67baf8c 100644 | |
| --- a/perl-Net-HandlerSocket/HandlerSocket.xs | |
| +++ b/perl-Net-HandlerSocket/HandlerSocket.xs | |
| @@ -522,7 +522,8 @@ execute_multi(obj, cmds) | |
| CODE: | |
| DBG(fprintf(stderr, "execute_multi0\n")); | |
| const I32 cmdsmax = av_len(cmds); | |
| - execute_arg args[cmdsmax + 1]; /* GNU */ | |
| +// execute_arg args[cmdsmax + 1]; /* GNU */ |