Skip to content

Instantly share code, notes, and snippets.

View ytnobody's full-sized avatar
♨️
470

ytnobody / satoshi azuma ytnobody

♨️
470
63 followers · 33 following
View GitHub Profile
@ytnobody
ytnobody / azure_func.pl
Last active February 18, 2017 01:04
Azure Function向けのヘルパーライブラリもどきスニペット
use strict;
use warnings;
use utf8;
use JSON::PP;
use Encode;
### タイムゾーン定義 / Azure Functionsでは必須。
BEGIN {
$ENV{TZ} = "JST-9";
};
@ytnobody
ytnobody / connpass_search_sum.pl
Last active February 14, 2017 09:18
【THE書き捨て】connpassから特定のキーワードで検索した結果を、月ごとのイベント数として出力するスクリプト
use strict;
use warnings;
use JSON;
use LWP::UserAgent;
use URI;
use utf8;
my $keyword = 'Serverless';
my $baseurl = "https://connpass.com/api/v1/event/";
@ytnobody
ytnobody / cpanfile
Created December 22, 2016 18:12
Perl入学式 Advent Calendar 2016 第23日目 「Perlで替え歌エンジンをつくる」
requires 'JSON';
requires 'LWP::UserAgent';
requires 'LWP::Protocol::https';
@ytnobody
ytnobody / plenv_install_5.20.3_on_windows_subsystem_on_linux.txt
Created November 3, 2016 16:10
plenv install 5.20.3 failed on windows subsystem on linux
Installing 5.20.3 as 5.20.3
/usr/bin/perl -- /home/ytnobody/.plenv/plugins/perl-build/bin/perl-build --symlink-devel-executables --build-dir /home/ytnobody/.plenv/build/1478189183.32125/ --tarball-dir /home/ytnobody/.plenv/cache/ -Dusedevel 5.20.3 /home/ytnobody/.plenv/versions/5.20.3
Use the previously fetched perl-5.20.3.tar.gz
Configuring perl '5.20.3'
rm -f config.sh Policy.sh
Auto-guessed '5.20.3'
patching Configure
File Configure is read-only; trying to patch anyway
sh Configure -Dprefix=/home/ytnobody/.plenv/versions/5.20.3 -de -Dusedevel -A'eval:scriptdir=/home/ytnobody/.plenv/versions/5.20.3/bin'
@ytnobody
ytnobody / tutum_functions.bash
Created December 21, 2015 02:04
tutum_container_uuid () {
service_name=$1
tutum service inspect $(tutum service ps | awk '$1=="'$service_name'"{print($2);}') |
awk '
/"containers": \[/, /\]/ {
if ($0 ~ /\/api\/v1\/container\//) {
split($1, flagment, "/");
print(substr(flagment[5],1,8));
}
}
@ytnobody
ytnobody / oreore-oredayo.pl
Created July 15, 2015 01:46
package Oreore;
use Data::Dumper;
sub oredayo {
my $args = [@_];
{
local @{caller.'::_'} = (qw/hoge piyo/);
print Dumper($args); ### => ['foo', 'bar']
print Dumper([@_]); ### => ['hoge', 'piyo']
};
@ytnobody
ytnobody / docker-revealup.md
Last active August 29, 2015 14:19
default slide of ytnobody/revealup

ytnobody/revealup

How to use

  1. Write the slide in markdown.
  2. Upload the slide to internet in accessible publicly.
  3. Access to manager and fill-in the URL for the slide.
  4. Submit the form. Then, access to Slide Page.
@ytnobody
ytnobody / hachiojipm-20150321
Last active August 29, 2015 14:17
# BigQuery
### の解析結果を
# 別のストレージ
### に格納したいぞい
@ytnobody
---
## わいとんさんです
@ytnobody
ytnobody / docker-meetup-tokyo-4.md
Last active August 29, 2015 14:13
Docker Meetup Tokyo #4 LT Slide

tutumで

雑に包んで

雑にデプロイ

Docker Meetup Tokyo #4

ytnobody

@ytnobody
ytnobody / perlbeginners16.md
Created December 22, 2014 10:57

DockerでWebappを公開するまで

@ytnobody

一応、自己紹介。

--