Skip to content

Instantly share code, notes, and snippets.

provider "aws" {
region = var.region
}
data "aws_security_group" "default" {
name = "default"
vpc_id = module.vpc.vpc_id
}
module "vpc" {
@saillinux
saillinux / placeFileInAllGithubRepos.php
Created June 20, 2019 15:36 — forked from bchecketts/placeFileInAllGithubRepos.php
Quick script to place a single file in every repository in your Github organization
<?php
## Generate a Github user token at https://github.com/settings/tokens
$githubToken = 'EnterYourGithubTokenHere';
## Your organization name (from https://github.com/yourOrganizationName)
$organization = 'yourOrganizationName';
## Enter the name of the remote file you want to place
$remoteFile = "pull_request_template.md";
;; Added by Package.el. This must come before configurations of
;; installed packages. Don't delete this line. If you don't want it,
;; just comment it out by adding a semicolon to the start of the line.
;; You may delete these explanatory comments.
(package-initialize)
(setq package-archives '(("gnu" . "https://elpa.gnu.org/packages/")
("melpa" . "https://melpa.org/packages/")))
@saillinux
saillinux / meeting.org
Created January 17, 2019 03:17
meeting.org

Meeting Agenda

Things we provide

  • Provisioning
  • Governance
  • Acounting and Cost reduction

branch strategies

monitoring

  • Prometheus/Grafana

Pipeline

# 모든 값을 키별로 더해서 합을 구하는데 사용 하는 해쉬
my %sums;
# __DATA__에 정의 되 값을 하나 하나 씩 읽어 들임
while (my $line = <DATA>) {
# AA 1을 split을 이용해서 스페이스로 나누고 @F에 결과 값을 저장 $F[0]에는 AA가 저장 $F[1]에는 1이 저장됨
my @F = split / /, $line;
# 아래를 풀이 하면 $sums{'AA'} += 1 즉 해쉬의 키는 유니크 하기 때문에 F[0]를 키로 이용해서 F[1]을 다 더함
$sums{$F[0]} += $F[1];
@saillinux
saillinux / dag_scheduler.pl
Created December 20, 2013 11:57
DAG Scheduler in perl
use strict;
use warnings;
use Graph;
use Data::Dumper;
use JSON;
use Capture::Tiny ':all';
use constant {
WAITING => 0,
RUNNING => 1,
@saillinux
saillinux / dag_scheduler.org
Created December 20, 2013 11:56
DAG 기반의 타스크 스케쥴러 구현

Perl이 제공 하는 이득과 혜택 덕분에 작성한 툴과 서비스를 헤아리면 끝이 없을 정도로 많은 일을 헤쳐 나갔습니다. 뒤돌아 보면 Perl 없이 어떻게 처리 했을고 하고 아찔 해 하곤 하네요.

주로 Perl을 이용하여 자동화를 구현 해온 저에게는 Perl이 주는 가능성은 정말로 끝이 없답니다. 덕분에 허세와 욕심을 부리게 되고 더욱 많은것을 할라고 추구 하게 되는거죠.

지금까지 우리는 자동화를 할때면 스크립트를 작성하거나 모듈을 작성 하여 여러군데에 적용 하여 일을 처리 하곤 하였습니다. 허나 더욱

@saillinux
saillinux / amoc_scheduler.pl
Last active December 31, 2015 11:59
Graph를 이용한 DAG 빌드 및 스케쥴링 타스크
use strict;
use warnings;
use Graph;
use Data::Dumper;
use Capture::Tiny ':all';
use constant {
WAITING => 0,
RUNNING => 1,
DONE => 2,