Skip to content

Instantly share code, notes, and snippets.

View skahack's full-sized avatar
🐳
...

Hiroki Sato skahack

🐳
...
52 followers · 9 following
  • Japan
View GitHub Profile
@skahack
skahack / README
Last active September 27, 2023 14:30
🐳
@skahack
skahack / goo.gl.hs
Created September 13, 2011 23:30
Goo.gl - Google URL shortener
{-# LANGUAGE OverloadedStrings, FlexibleContexts #-}
module Googl
( shorten
, expand
) where
import Control.Applicative ((<$>), (<*>), empty)
import Control.Monad
import Data.Aeson
@skahack
skahack / bwt.js
Last active December 12, 2018 14:34
Burrows-Wheeler Transform; BWT, Move-to-front transform
//
// Burrows-Wheeler Transform; BWT
// http://en.wikipedia.org/wiki/Burrows%E2%80%93Wheeler_transform
// http://www.geocities.jp/m_hiroi/light/pyalgo48.html
//
var _ = require('underscore');
function BWT(){}
@skahack
skahack / Dockerfile
Last active August 14, 2017 17:33
FROM ubuntu:12.04
MAINTAINER SKAhack
run echo "deb http://archive.ubuntu.com/ubuntu quantal main universe" > /etc/apt/sources.list
RUN apt-get update
RUN apt-get install -y software-properties-common
RUN apt-get install -y openssh-server
RUN apt-get install -y sudo
RUN mkdir -p /home/docker
@skahack
skahack / index.html
Created January 22, 2016 08:37
iOS 9 Safari - workaround
<!doctype html>
<html lang="en">
<head>
<meta charset="utf-8">
<title>Viewport Test</title>
<meta name="viewport" content="width=device-width, initial-scale=1">
<script src="/workaround.js"></script>
</head>
<body>
@skahack
skahack / gist:fc42344a3b681c3c3db083793f7e7b9c
Created August 14, 2016 12:10
const React = require('react');
const { EditorBlock } = require('draft-js');
const H3 = (props) => {
return <div>
<span className="h3" style={{color: '#eb6a7a'}}>■</span>
<div style={{display: 'inline-block'}}>
<EditorBlock {...props} value={props.value} />
</div>
</div>;
@skahack
skahack / gist:37c6e14ee1613f1211ee479d28c764e4
Created June 19, 2016 12:53
module "stack" {
source = "github.com/SKAhack/stack"
name = "sugoi-project"
environment = "prod"
key_name = "key-pair-ap-northeast-1"
region = "ap-northeast-1"
availability_zones = "ap-northeast-1a,ap-northeast-1c"
ecs_instance_type = "t2.micro"
internal_subnets = "10.30.0.0/19,10.30.64.0/19"
ecs_ami = "ami-095dbf68"
@skahack
skahack / gist:1207826
Created September 10, 2011 02:02
Haskell like
clone = (n) ->
if Array.isArray(n)
re = [].concat n
else
re = Object.extended({})
for key in n
re[key] = n[key]
re
foldr = (f) -> (x) -> (y) ->
@skahack
skahack / APKBUILD
Last active March 17, 2016 19:03
http://git.alpinelinux.org/cgit/aports/tree/main/ruby/APKBUILD?id=3afa43694d2bfcb8401e198114b238eab4a133b4
# Contributor: Carlo Landmeter <clandmeter@gmail.com>
# Maintainer: Natanael Copa <ncopa@alpinelinux.org>
pkgname=ruby
pkgver=2.3.0
_pkgver=${pkgver/_/-}
pkgrel=0
_abi=2.3.0
pkgdesc="An object-oriented language for quick and easy programming"
@skahack
skahack / gist:6317691
Last active December 21, 2015 14:09
Macでスクリーンショットを撮ったらDropboxに入るようにする方法

Macでスクリーンショットを撮ったらDropboxに入るようにする方法

次のコマンドをターミナルで実行するだけ。

$ defaults write com.apple.screencapture location /path/to/Dropbox
$ killall SystemUIServer

/path/to/Dropboxの部分が保存先になります。ここをDropboxの公開フォルダにすればすごく便利！