Upgrade to Pro
— share decks privately, control downloads, hide ads and more …
Speaker Deck
Features
Speaker Deck
PRO
Sign in
Sign up for free
Search
Search
Perl meets Real World
Search
mackee
August 29, 2014
Programming
1
6.7k
Perl meets Real World
YAPC::Asia 2014 2014-08-29 by @mackee_w
mackee
August 29, 2014
Tweet
Share
More Decks by mackee
See All by mackee
今!ソフトウェアエンジニアがハードウェアに手を出すには
mackee
15
5.2k
ワンバイナリWebサービスのススメ
mackee
10
8k
tanukistack ライブコーディング / tanukistack live-coding
mackee
0
120
range over funcの使い道と非同期N+1リゾルバーの夢 / about a range over func
mackee
0
920
perl for shell, awk and sed programmers
mackee
3
2.5k
今更GoのWebフレームワークを作ろうとしているワケ / Why am I trying to create a Go web framework now?
mackee
1
890
database/sqlでNullを扱う歴史とsql.Null[T]の登場 / sql.Null[T] history
mackee
0
770
マイクロサービス化を利用した Goへの移行事例
mackee
0
910
PerlでつくるフルスクラッチWebAuthn/パスキー認証 / Demonstration of full-scratch WebAuthn/Passkey Authentication written in Perl
mackee
3
5.3k
Other Decks in Programming
See All in Programming
10年もののAPIサーバーにおけるCI/CDの改善の奮闘
mbook
0
800
いま中途半端なSwift 6対応をするより、Default ActorやApproachable Concurrencyを有効にしてからでいいんじゃない?
yimajo
2
390
非同期jobをtransaction内で 呼ぶなよ!絶対に呼ぶなよ!
alstrocrack
0
580
CSC509 Lecture 03
javiergs
PRO
0
330
大規模アプリのDIフレームワーク刷新戦略 ~過去最大規模の並行開発を止めずにアプリ全体に導入するまで~
mot_techtalk
0
410
CI_CD「健康診断」のススメ。現場でのボトルネック特定から、健康診断を通じた組織的な改善手法
teamlab
PRO
0
200
Swift Concurrency - 状態監視の罠
objectiveaudio
2
490
オープンソースソフトウェアへの解像度🔬
utam0k
8
1.7k
Railsだからできる 例外業務に禍根を残さない 設定設計パターン
ei_ei_eiichi
0
400
Web Components で実現する Hotwire とフロントエンドフレームワークの橋渡し / Bridging with Web Components
da1chi
3
2k
GitHub Actions × AWS OIDC連携の仕組みと経緯を理解する
ota1022
0
250
ソフトウェア設計の実践的な考え方
masuda220
PRO
3
530
Featured
See All Featured
4 Signs Your Business is Dying
shpigford
185
22k
Bash Introduction
62gerente
615
210k
Creating an realtime collaboration tool: Agile Flush - .NET Oxford
marcduiker
32
2.3k
Being A Developer After 40
akosma
91
590k
The Success of Rails: Ensuring Growth for the Next 100 Years
eileencodes
46
7.6k
Docker and Python
trallard
46
3.6k
[RailsConf 2023 Opening Keynote] The Magic of Rails
eileencodes
31
9.7k
Writing Fast Ruby
sferik
629
62k
Save Time (by Creating Custom Rails Generators)
garrettdimon
PRO
32
1.6k
Improving Core Web Vitals using Speculation Rules API
sergeychernyshev
19
1.2k
Understanding Cognitive Biases in Performance Measurement
bluesmoon
29
2.6k
Mobile First: as difficult as doing things right
swwweet
224
10k
Transcript
Perl meets Real World 2014-08-29 YAPC::Asia 2014
@mackee_w a.k.a Ϛίϐʔ • ໘ന๏ਓΧϠοΫ ٕज़෦ • αʔόαΠυΤϯδχΞ(Perl) • ιʔγϟϧήʔϜͷ։ൃ/ӡ༻
• ࠓ࡞͍ͬͯΔήʔϜࣄલొडத
ͯ͞
WebΤϯδχΞ͕ ԿނϋʔυΣΞ͔ʁ
ڈগ͚ͩ͠ϋʔυΣΞͷ ࣄΛͨ͠ • ઇࢁͰϥδίϯϔϦΛඈ͢ࣄ • Webͷٕज़͔͠ແ͔ͬͨ • ௐͨΒ࠷ۙͷϋʔυ͍͢͜͝ͱʹͳͬ ͍ͯͨ
ٕͬͨज़ • RaspberryPi • Arduino • OpenCV • Ansible
ϋʔυΣΞ શ෦ҰൠతʹೖखՄೳ
ιϑτΣΞ “Web”ʹ௨ͣΔٕज़ͨͪ
ۤ࿑͚͋ͬͨΕͲ ָ͔ͬͨ͠ͷͰ”ํ๏”ͷ Ұ෦Λհ͠·͢
ࠓ͢͜ͱ • RaspberryPiͱArduino • ΦʔϓϯιʔεϋʔυΣΞ • Perl͚ͩͰωΪΛৼΔ • ࣗ࡞ϋʔυΣΞͱະདྷ
ࠓ͞ͳ͍͜ͱ • ϋϯμ͚ʢձ͔Β͓ͦΒౖ͘ΒΕΔʣ • ճ࿏ઃܭʢཁ͕͋Εผͷػձʹʣ • ΨνͷArduinoʢ͍ͨΒ࠙ձͱ͔Ͱʣ • ͦͷଞΨνిࢠ࡞
ୈҰষ Raspberry PiͱArduino
Raspberry Pi http://commons.wikimedia.org/wiki/File:Raspberry_Pi_Photo.jpg
• ARM 700MHz • 512MB RAM(Model B) • SD CARD
• 100BASE-TX LAN • USB2.0 x 2 • HDMI and RCA VIDEO • Audio • Power by USB
Q. Ͱɺ͜ΕͰPerlಈ͘ͷʁ
A. ͪΖΜಈ͖·͢ʂ
ී௨ͷLinux͕ಈ͘ • Raspbian (DebianͷRasPi͚ΧελϜ) • NOOBS(for beginner) • Pidora(FedoraͷRasPi͚ΧελϜ)
ͦͦͷRasPiͷత • খதֶੜൃల్্ࠃ͚ͷITڭҭ • RCAϏσΦδϟοΫ͕͍͍ͯΔͷൃల్্ ࠃͷϒϥϯςϨϏͰ͏ͨΊ • MinecraftͷRasPi൛ͱ͔͋ͬͯPythonͰΧελ ϚΠζͰ͖ͨΓ͢Δ
kano ࢠڙ͚ͷΦʔϧΠϯϫϯͷPCΩοτ https://www.kickstarter.com/projects/alexklein/kano-a-computer-anyone-can-make
͔͠͠େਓ༷ͯ͠ʑͳ ϓϩδΣΫτ͕ڵͬͨ
RaspberryPiΛͬͨϓϩδΣΫτ
Raspberry Pi Կނ/׆༻͞Ε͔ͨ
·͍͋ΖΜͳཧ༝͋Δ • ͍҆ (B/B+͕4000ԁఔ) • ΫϨδοτΧʔυαΠζ • ଞʹطʹಉछͷͷ͋ͬͨ • ڥ͕͍ͬͯΔ(ग़͕ࣗॳ৺ऀ͚)
• ࡞ྫ͕ଟ͍
GPIO
GPIO - ݱ࣮ੈքʹհೖ͢ΔͨΊͷखஈ
ిؾΛݟฉ͖͠ɺ͠ΌΔ • ϞʔλʔͳͲͷۦಈػثͷಈ࡞ -> ࢛ࢶ • ηϯαʔͰͷपғঢ়گͷݕ -> ޒײ
ిؾͱ͍͏࠷ϨΠϠʔΛ खܰʹѻ͑Δͷ͕RasPi
Arduinoͷ
• ిؾΛѻ͏͜ͱʹಛԽ • 8bit ϚΠίϯΛࡌ • ॲཧೳྗඇৗʹখ͍͞ • USBೖྗઐ༻ •
ྫ֎͋Δ • LinuxͳͲ౸ఈಈ͔ͳ͍ • ϐϯΛૢ࡞͢Δ
Q. Ͱɺ͜ΕͰPerlಈ͘ͷʁ
A. (‘A`) ಈ͔ͳ͍ɻɻɻ
ϋʔυΣΞ୯ମͰඇྗ͕ͩ ΤίγεςϜ͕ڧྗ
Arduino IDE ArduinoʹඞཁͳͷΛશͯ٧ΊࠐΜͩιϑτΣΞ
γʔϧυ ُࢠُํࣜͰ֦ு͢ΔΞλονϝϯτ
ϥΠϒϥϦArduinoΛલఏͱͨ͠Ωοτ
͜͏͍͚Δ
RaspberryPiͰΓ͍ͨ͜ͱ • ը૾ॲཧͱ͔Τϯίʔυͱ͔ॏ͍ͨॲཧ • ෳࡶͳΞϧΰϦζϜΛཁ͢Δͷ • PC͚ͷϥΠϒϥϦ͕͙͢ಈ͖͍͢ • ؆୯ͳΦϯΦϑఔͷϋʔυΣΞ੍ޚ
ArduinoͰΓ͍ͨ͜ͱ • ࣗ࡞ͷిࢠ෦ͳͲͱ࿈ܞ͢Δέʔε • Arduino͚ϥΠϒϥϦ͕͢Ͱʹ͋Δ߹ • PWM੍ޚͳͲͷߴʹΦϯɾΦϑΛΔ߹ • RasPiͩͱ͜͏͍͏͜ͱΛΔͱCPUΛΊͬ ͪΌ৯͏
ීஈ2ͭΛΈ߹ΘͤΔ͜ͱ ͕ଟ͍Ͱ͕͢ɺͦΕޙͷষͰ
ୈೋষ ΦʔϓϯϋʔυΣΞ
ΦʔϓϯιʔεϥΠηϯε • ࣗ༝ͳ࠶൦͕Մೳ • ιʔείʔυ͕ೖखͰ͖Δ • ੜΛ࡞ͬͯྑ͍ • ͦͷଞϥΠηϯε͕ܧঝ͞ΕΔͱ͔
ϋʔυΣΞʹ͓͚Δ Φʔϓϯιʔεͱ
ϋʔυΣΞͷιʔε • ϑΝʔϜΣΞ • ճ࿏ਤ • ෦ใ • ج൘ஔਤ
Arduinoͷྫ
ճ࿏ਤ(Arduino Unoͷ߹) http://arduino.cc/en/Main/ArduinoBoardUno
ج൘ஔਤEagleͱ͍͏ ճ࿏ਤ/ج൘ΤσΟλͷܗࣜͰ ൦͞Ε͍ͯΔ
ͭ·Γ؆୯ʹArduinoΛ ࣗ࡞͢Δ͜ͱ͕ग़དྷΔ
ݱʹΫϩʔϯ͕͍ͬͺ͍ଘࡏ͢Δ
ArduinoΛࣗ࡞͢ΔϝϦοτ • ػೳͷՃ • Ϟʔλʔ੍ޚճ࿏ΛΈࠐΉͱ͔ • ϑοτϓϦϯτͷݮগ • ΊͬͪΌখ͍͞ػثʹੵΈ͍ͨ •
ArduinoͷΤίγεςϜͷԸܙΛड͚ΒΕΔ
ϋʔυΛΦʔϓϯʹ͢Δ͜ͱ • ϋοΫΛଅ͢ • ΤίγεςϜ͕ൃల͍͢͠ • ྲྀߦΔͱ͕ͨ͘͞Μग़ͯ͘Δ • ArduinoRasPi໊લΛ͏ͷΛϥΠη ϯεͰ੍ݶ͍ͯ͠Δ
ΦʔϓϯʹͳΕϋʔυΣΞ ͰϚογϡΞοϓ(ࢮޠ) ग़དྷΔͱ͍͏͜ͱͰ͢Ͷ
ୈࡾষ Perl͚ͩͰωΪΛৼΔ
None
ωΪΛৼΔͱʁʁʁ • ݩʑχίχίಈըͷॳԻϛΫಈըͰωΪΛ ৼΔͷ͕͋Δ • χίχίٕज़෦ͰೖಈըͰΑ͘ࡐʹͳ Δ • ͍ΖΜͳͷͰωΪΛৼ͍ͬͯΔ
ҎԼͷറΓͰ࡞Δ • ϋϯμ͚ͳ͠ ϒϨουϘʔυͳ͠ • Arduinoݴޠॻ͔ͳ͍ • Perlॻ͘(YAPCͳͷͰ)
ࡐྉ • Raspberry Pi Model B • Arduino Leonardo(Ոʹ͋ͬͨ) •
GROVE System
GROVE Systemͱ
͜͏͍͏ͪͬͪΌ͍෦͕͋ͬͯ
͜͏͍͏γʔϧυΛArduinoʹࡌ͚ͬͯ
͜Μͳ͔Μ͡Ͱͭͳ͛ͯ͏
͏ͨΊͷϥΠϒϥϦطʹ උ͞Ε͍ͯΔ
Step 1 Raspberry PiͱArduinoͰ ͓͠ΌΓ͢Δ
Firmata͍ͬͯ͏ͷΛ͍·͢ • FirmataArduinoͱ͔ͷϚΠίϯͱPCؒ Ͱ͓͠ΌΓ͢ΔͨΊͷϓϩτίϧ • ͓खܰಋೖՄೳ
ࠓFirmataͰLEDΛޫΒ͢
PerlͰFirmataΛ͠ΌΔ
ArduinoʹFirmataͷ εέονΛॻ͖ࠐΉ
ϋʔυͷ΄͏ͷ४උ • ArduinoͱGROVE Base ShieldΛଓ • γʔϧυͷD4ʹLEDϞδϡʔϧΛଓ • ArduinoͱRaspberry PiΛͭͳ͛Δ
Step 2 αʔϘϞʔλΛ͏
GROVEͷαʔϘϞʔλ D3ʹͭͳ͍ͩ
Step 3 WebΞϓϦԽ͢Δ
Amon2Ͱ࡞Δ
WebΞϓϦͷػೳ • WebSocketͰ֯ใΛड৴ • ͦͷΛRedisʹॻ͖ࠐΉ
ผϓϩηεͷϫʔΧʔ • ແݶϧʔϓͰRedisͷΛࢹ • มԽ͕͋ΕFirmataͰArduinoʹૹ৴
σϞ
࠷ऴষ ࣗ࡞ϋʔυΣΞͱະདྷ
ϋʔυΣΞΛࣗͰ࡞ΕΔ ࣮࣌֬ʹདྷ͍ͯΔ • 3DϓϦϯλͱ͔ੲߟ͑ΒΕͳ͔ͬͨ • ᝑମΛ͔ͬ͜ྑ͘࡞Δ͕ૉૣ͘ղܾ • ϋʔυΣΞΛखചΓ͢Δ࣌ʹͳͬͨ • Make
Fairͱ͔Ͷ
IRKit http://getirkit.com/
IRKit • தArduinoޓج൘ • ͯ͢Φʔϓϯ • ճ࿏ઃܭᝑମͷઃܭΛݸਓͰߦ͏
ϋʔυΣΞΛ͕ͬͭΓΒ ͣʹ࡞ΕΔ࣌ • ࣗͷख׳ΕͨݴޠͰهड़Ͱ͖Δ • ϋϯμ͚ෆཁ • εςοϓΞοϓ͢ΔͱϒϨουϘʔυ ϋϯμ͚͕ඞཁʹͳΔ͚ΕͲ
·ͩ·ͩΓͳ͍͜ͱ (͕Βͳ͍͚͔ͩ) • ΤϯδχΞϦϯάͱͯ͠ͷΈԽ • PerlͰݴ͏CPANΈ͍ͨͳͭ • ษڧձɺϫʔΫγϣοϓ • ςετڥ
ϋʔυΣΞͳਓͱग़ձ͍͍ͨʂ • WebͷਓͱΑ͘ձ͏͚ΕͲɺ͜͏͍͏͜ ͱ͍ͬͯΔਓͳ͔ͳ͔ग़ձΘͳ͍ • ͍ͨΒհͯ͠ཉ͍͠͠ɺ͋ͳ͕ͨͦ͏Ͱ ͋Ε༑ͩͪʹͳ͍ͬͯͩ͘͞
͝ਗ਼ௌ͋Γ͕ͱ͏͍͟͝·ͨ͠
࣭ٙԠ ͕࣌ؒ༨ͬͨΒΔ༻
ແઢԽ
γϦΞϧΛແઢԽ • XBee/XBee WiFiͦͷଞແઢLANϞδϡʔϧ • γϦΞϧΛZigBeeWiFiʹมͰ͖Δ • ٕదʹҙ • ւ֎Ϟδϡʔϧి๏ͰҾ͔͔ͬΔͱ
͔͋Δ
RasPi Cam
Raspberry Piઐ༻Χϝϥ • খ͍͍ͦͦ҆͜͜͞͠(2000ԁ) • ͨͩ͠RasPiઐ༻ • RasPiΛϥΠϒΧϝϥͱ͔ʹग़དྷΔ • ϔϦͰ͍·ͨ͠ʢখ͍͞͠USB৯Θͳ͍