Skip to content

Instantly share code, notes, and snippets.

Avatar
🐈
walking around like a cat

Masatoshi Kawazoe acidlemon

🐈
walking around like a cat
View GitHub Profile
View slack_reporter.pl
#!/usr/bin/perl
use strict;
use warnings;
use utf8;
use 5.014;
use Encode;
use JSON::PP qw/encode_json decode_json/;
use Sys::Hostname;
use IPC::Open2;
View mapbench_test.go
package mapbench_test
import "testing"
var N = 1000000
var m1 map[int]int = map[int]int{}
var m2 map[int]int = make(map[int]int, N)
View 01_ListenAndServe.go
package main
import (
"fmt"
"io"
"log"
"net/http"
)
func Handler(w http.ResponseWriter, req *http.Request) {
@acidlemon
acidlemon / parallel.go
Last active Aug 29, 2015
embedded Perl in Go /w goroutine
View parallel.go
package main
/*
#include <EXTERN.h>
#include <perl.h>
#include <stdio.h>
void init_perl() {
// PerlのCランタイムの初期化(全体で1回)
int argc = 0;
@acidlemon
acidlemon / test.go
Created Nov 27, 2014
simple embedded perl in Go
View test.go
package main
/*
#include <EXTERN.h>
#include <perl.h>
#include <stdio.h>
static PerlInterpreter* perl;
void init_perl() {
@acidlemon
acidlemon / test.c
Created Nov 27, 2014
simple embedded perl in C
View test.c
#include <EXTERN.h>
#include <perl.h>
#include <stdio.h>
int main(int argc, char* argv[], char* env[]) {
PerlInterpreter* perl;
// PerlのCランタイムの初期化(全体で1回)
PERL_SYS_INIT3(&argc, &argv, &env);
View perl-xslate.pl
use strict;
use warnings;
use utf8;
use Test::More;
use Text::Xslate;
use Data::Section::Simple;
my $tx = Text::Xslate->new(
syntax => 'TTerse',
@acidlemon
acidlemon / gist:049fe8c9a790a52814fc
Created Aug 15, 2014
ISUCON 2013 本戦レギュレーション
View gist:049fe8c9a790a52814fc

ISUCON 2013 本戦レギュレーション

いつもの

競技は運営の用意したベンチマークのスコアの高さで優劣を競います。スコアが高くなれば高くなるほど優秀です。初期実装はGo, Javascript(Node), Perl, PHP, Python, Rubyの6言語を提供します。それ以外の言語で再実装するのは自由です。

採点基準は以下の通りです。

  • 一定時間内にリクエストを処理できた回数が多いほど高スコア
  • 特定のリクエストのレスポンスタイムが速いと高スコア(後述のベンチマーク仕様に詳細を記載しています)
@acidlemon
acidlemon / gist:2c7d4e2e5b4e24007e39
Last active Aug 29, 2015
ISUCON 2013 予選レギュレーション
View gist:2c7d4e2e5b4e24007e39

ISUCON 2013 予選レギュレーション

参加者

予選参加者 (以下参加者) はチームでの登録とし、チームは2人もしくは3人での構成とする。

参加者は予選の第1日目、2日目のいずれかのみに参加することができる。

参加者は「一般枠」「学生枠」のいずれかに登録すること。

@acidlemon
acidlemon / fluent-configtest.rb
Created May 7, 2013
原始的なfluentd configtest
View fluent-configtest.rb
require 'rubygems'
require 'fluent/config'
obj = Fluent::Config.read(ARGV[0])
if obj then
print "config is OK\n"
else
print "config has some errors\n"