Skip to content

Instantly share code, notes, and snippets.

View note103's full-sized avatar
🏠
Working from home

Hiroaki Kadomatsu note103

🏠
Working from home
View GitHub Profile
@hSATAC
hSATAC / 256color.pl
Created July 20, 2011 14:48
256color.pl
#!/usr/bin/perl
# Author: Todd Larason <[email protected]>
# $XFree86: xc/programs/xterm/vttests/256colors2.pl,v 1.2 2002/03/26 01:46:43 dickey Exp $
# use the resources for colors 0-15 - usually more-or-less a
# reproduction of the standard ANSI colors, but possibly more
# pleasing shades
# colors 16-231 are a 6x6x6 color cube
for ($red = 0; $red < 6; $red++) {
@hayajo
hayajo / changelog_en.md
Last active November 2, 2024 12:48
ChangeLog を支える英語

ChangeLog を支える英語

ChangeLog を書く際によく使われる英語をまとめました。

ほとんど引用です。

基本形

@tcnksm
tcnksm / docker_cheat.md
Last active August 5, 2021 03:59 — forked from wsargent/docker_cheat.md
Docker 虎の巻

Docker 虎の巻

何故Dockerを使うべきか

Why Should I Care (For Developers)

"Dockerが面白いのはシンプルな環境に隔離性と再現性をもたらしてくれることだ.ランタイムの環境を一度作れば、パッケージにして別のマシンでも再利用することできる.さらに,すべてはホスト内の隔離された環境で行われる(VMのように).最も素晴らしい点は,シンプルかつ高速であることだ."

@shimizukawa
shimizukawa / 202518103-Restricted-Accounts-and-Single-Channel-Guest-FAQ.rst
Last active August 29, 2015 14:02
【Slack FAQ 翻訳】 2014/6/23 制限アカウントとシングルチャンネルゲスト FAQ Restricted Accounts and Single-Channel Guest FAQ
@karupanerura
karupanerura / add.pl
Last active February 24, 2017 05:54
Perlのサブルーチンにおいて引数を解釈するということ
use strict;
use warnings;
use utf8;
use feature qw/say/;
# add3(1, 2, 3) => 6
# Perlの引数は@_という配列に入るのでそれに名前を付けるために変数に代入
sub add3 {
my ($left, $middle, $right) = @_;
return $left + $middle + $right;
@koemu
koemu / yapc_asia_tokyo_2015_memo.md
Last active August 29, 2015 14:27
YAPC::Asia Tokyo 2015 メモ
@7shi
7shi / text.md
Last active March 15, 2017 06:38
アスキードワンゴ編集部 編集長 鈴木嘉平氏 『技術書を出版するには』
@xtetsuji
xtetsuji / colorsyslog.pl
Created November 5, 2015 09:41
Portable utility of coloring Syslog format and same kind class, e.g. Postfix.
#!/usr/bin/perl
# xtetsuji 2015/11/05
use v5.10;
use strict;
use warnings;
use Term::ANSIColor;
my $syslog_re = qr/^(?<date>\w\w\w [ \d]\d) (?<time>\d\d:\d\d:\d\d) (?<host>\S+) (?<process>\S+): (?<message>.*)/;