ワークショップ #00 2014-07-05
- 今回はガイアックス様の会議室を使ってやっています
- 飲食は自由です
- 寒い等あったら言ってください
| package mizar | |
| import ( | |
| "testing" | |
| ) | |
| type Table1 struct { | |
| Id DBInteger `db:"id"` | |
| Name DBVarchar `db:"name"` | |
| Description DBVarchar |
| package main | |
| import ( | |
| "fmt" | |
| "github.com/codegangsta/cli" | |
| "log" | |
| "net/http" | |
| "os" | |
| "time" | |
| ) |
| use strict; | |
| use warnings; | |
| use utf8; | |
| use File::Spec; | |
| use File::Basename; | |
| use lib File::Spec->catdir(dirname(__FILE__), 'extlib', 'lib', 'perl5'); | |
| use lib File::Spec->catdir(dirname(__FILE__), 'lib'); | |
| use Amon2::Lite; | |
| our $VERSION = '0.12'; |
| my @input_numbers = (1, 2, 4, 8, 16, 32, 64); | |
| my @result = map { | |
| my @digits = split //,$_; # $_を文字列として1文字ずつに分解する => 桁ごとに分解 | |
| if ($digits[-1] == 4) { # 一番最期の桁(=1の位)の桁がもし4であれば | |
| @digits; #すべての桁をリストとして返す | |
| } else { #そうでなければ | |
| (); # なにも返さない | |
| } | |
| } @input_numbers; |
| package kuiperbelt | |
| import ( | |
| "log" | |
| "sync" | |
| ) | |
| type BroadcastNotifier struct { | |
| notifyChan chan bool | |
| notifyingChan chan bool |
| void setup() { | |
| pinMode(13, OUTPUT); | |
| Serial.begin(9600); | |
| } | |
| char data; | |
| int f = 0; | |
| void loop() { | |
| if (Serial.available() > 0) { | |
| data = Serial.read(); |
| package main | |
| import ( | |
| "encoding/json" | |
| "fmt" | |
| "github.com/ziutek/mymysql/mysql" | |
| _ "github.com/ziutek/mymysql/native" | |
| "io" | |
| "log" | |
| "os" |
| package main | |
| import ( | |
| "encoding/json" | |
| "encoding/xml" | |
| "io" | |
| "log" | |
| "os" | |
| "strings" | |
| ) |