Upgrade to Pro — share decks privately, control downloads, hide ads and more …

ぼくがPerlで開発を行う時に工夫していること

ybrliiu
April 16, 2018

 ぼくがPerlで開発を行う時に工夫していること

Gotanda.pm #17

ybrliiu

April 16, 2018
Tweet

More Decks by ybrliiu

Other Decks in Programming

Transcript

  1. 自己紹介 liiu / @_ybrliiu MobileFactory 18新卒 (希少な)Perl使いです プログラミング / 歴史

    / (F|T)PS 学生時代にCGIゲーム運営してたりしていました 2 / 12
  2. 使用例 use Scalish qw( option ); subtest 'match' => sub

    { my $option = option 'something'; my $ret = $option->match( Some => sub { 200 }, None => sub { 404 }, ); is $ret, 200; my $none = option undef; my $ret2 = $none->match( Some => sub { 200 }, None => sub { 404 }, ); is $ret2, 404; }; 8 / 12
  3. よく使うプラグマなどを一気に有 効にする package NewApp::Exporter { use strict; use warnings; use

    utf8; use feature qw( :5.26 signatures ); sub import { $_->import for qw( strict warnings utf8 ); feature->import(qw[ :5.26 signatures ]); warnings->unimport('experimental::signatures'); } } 9 / 12
  4. 使用例 use Moose; use Mojo::Base; と同じようなことをしてい ます package NewApp::Service::DoSomething {

    # enable strict, warnings, utf8, feature(':5.26'), and signatures # disenable warnings 'experimental::signatures'; use NewApp::Exporter; sub do_something($self) { ... } } 10 / 12