Perl入学式 Advent Calendar 2017 > 8日目 2012年から開始されたPerl入学式ですが、最初の数年間の模索期間を経て、ここ1〜2年は運営フローもだいぶスムーズになりました。今回は「普段どんな感じで運営作業をしているの？」というお話です。 ツールのご紹介 今はだいたい以下のツールに落ち着いています。 チャット：Slack タスク管理：GitHub Issue 資料作成：GitHub Repository + Markdown ウェブサイト運用：GitHub Page その他：Google Drive 最近のIT業界やITコミュニティでもよく見るラインナップです。 以前使っていたツール ここに至るまで変遷があったツールもあります。 チャット：Lingr → Idobata → Slack（イマココ） タスク管理：Cybozu Live → GitHub Issue（

「全アクセスがmemcachedに行ったら負け」超大量リクエストをさばくフリークアウトの技術哲学 アドテクノロジーの雄、フリークアウトのエンジニアは、日々圧倒的な量のリクエストと戦っています。こうしたシビアな世界での仕事は、若きエンジニアをどのように鍛えるのでしょうか。 株式会社フリークアウト。アドテクノロジーに携わる者ならば、その社名を1度は聞いたことがあるでしょう。DSP*1のシェア国内トップクラスである同社は、高い技術力に裏付けされた信頼性の高い広告配信サービスを提供しています。 その安定した技術基盤を生み出すには、メンバーの育成やカルチャーの醸成が必要不可欠です。フリークアウトはいかにして、“強いエンジニアチーム”を作り上げているのでしょうか。 広告配信インフラやデータ基盤などを担うAccelerator divのテックリード本間雅洋（ほんま・まさひろ／@hiratara）さんと、

Perl › 関数 › here return関数を使うとサブルーチンの戻り値を返却することができます。 return 戻り値 実際に使用する場合は、returnをサブルーチンの中で記述します。 sub sum { my ($num1, $num2) = @_; my $total = $num1 + $num2; # 戻り値の返却 return $total; } 戻り値は、サブルーチンを呼びだして取得できます。 my $return_value = sum(2, 4); 空のreturn 空のreturnは、特殊な構文で、リストコンテキストの場合は、空リストを、[スカラコンテキストの場合は、undefを返却します。 # 空のリターン return Perlでは空のリターンは頻繁に使われる構文です。 複数の戻り値 Perlでは、リストや配列を使用すると複数の値を返却することができます。

NAME Algorithm::MarkovChain - Object oriented Markov chain generator SYNOPSIS use Algorithm::MarkovChain; my $chain = Algorithm::MarkovChain::->new(); # learn about things from @symbols $chain->seed(symbols => \@symbols, longest => 6); # attempt to tell me something about the sky my @newness = $chain->spew(length => 20, complete => [ qw( the sky is ) ]); DESCRIPTION Algorithm::MarkovChain is an im

2023年10月追記 XAMPのPerlには今でもppm.batが同梱されていますが、以下のようにもうPPMのモジュールはビルドされていないためPMMからモジュールをインストールすることはできません。 https://www.activestate.com/products/perl/ppm-perl-modules/ UPDATE 2021: PPM has been removed from ActivePerl 5.28, and will no longer build many packages for previous versions of ActivePerl. はじめに WindowsのPerlにはPPMというパッケージマネージャがあります。cpanだとバイナリモジュールはローカルでビルドされてインストールされるのでビルド環境が必要になりますが、PPMではバイナリパッケー

IP アドレスのプレフィックス、サブネットマスク計算、面倒ですよね。 あんなの暗記したくないですよね。 私は暗記してません。 手元の環境で常に ipcalc.pl が使えるようにしてあります。 http://jodies.de/ipcalc Perl のスクリプトなんで何処でも気軽に動かせるのでイイ！！ これさえあれば Cisco 機器へ設定するときに間違えることもない！！ｗ 使用例 標準的な実行 ./ipcalc.pl 10.1.1.123/24 Address: 10.1.1.123 00001010.00000001.00000001. 01111011 Netmask: 255.255.255.0 = 24 11111111.11111111.11111111. 00000000 Wildcard: 0.0.0.255 00000000.00000000.00000000. 111

初めまして、Fortranと申します。 普段はネットワーク中心のインフラエンジニアをしておりますが、休みの時には趣味で私用VPS上でPythonやPerlのコードを書いてます。 勉強がてら、学んだことをアウトプットしていきたいと思いますのでよろしくお願いいたします。 なぜこのテーマなのか？ インフラを作っていく時に、色々な方々からこういうことを聞きます。 最新のネットワーク構成図が乱立して見つけにくい。 ネットワークが複雑になってきて、構成図を作るのが面倒くさい大変になってきた。 自動で作ってくれるようなソリューションは見かけるけど、値が張るんだよなぁ。 それを聞いて「完全内製でシステムを作れないかな」と思い立ったのがきっかけです。 どうやって実現する？ さっと、こんな構成でできないかなぁ、と考えています。 構成図を自動で出力する仕組みは、nwdiagと呼ばれるPythonで書かれたオープ

Whileループ内で行われるforループの中でカウンタ変数を使用し、ループ回数を計測しています。しかし、forループを抜けるとカウンタ変数の値がリセットされてしまいます。 While文のループのなかにfor文でループをまわしているスクリプトなのですが、 forの中でカウンタ変数をつくり、ループ回数を計測しております。 またforの中である条件を満たした際に、lastでforを抜け、引き続きWhileのループを継続するという処理をしております。 $i=0; While(○○){ 処理1 for(××){ 処理2 $i++; if($i >=100){ 処理3 last; } } } ここで、一度for文のif文で一度forループを抜け、Whileでループをし、またforループに突入した際に、前回forループでカウントした$iの値を保持したまま、そのつづきから$iのカウンタを動作させたいのです

About reserved postingIf you register a secret article by the day before the same day, it will be automatically published around 7:00 on the same day. About posting periodOnly articles submitted after November 1 of the year can be registered. (Secret articles can be registered anytime articles are posted.)

先日のエントリ、『ZabbixAPI.pm作ってみた』に出てくるこのようなコード、 $za->apiinfo_version(); $za->hostgroup_get({output => "extend"}); 実は以下のコードと等価です。 $za->call_api("apiinfo.version"); $za->call_api("hostgroup.get", {output => "extend"}); この書き方が冗長に感じたため、未定義のメソッド呼び出しを捕捉して別のメソッドに変換する処理を追加しています。 この部分ですね。 sub AUTOLOAD{ my $self = shift; my $method = our $AUTOLOAD; $method =~ s/.*:://; if($method =~ tr/_/./ == 1){ $self->call_api

CGI(Perl)のメールフォームで、 Base64エンコードでメール送信をするときに、 特定の文字列の組み合わせをエンコードしたものが、 環境によりタイトルだけ文字化けする現象が発生します。 GmailとWindowsメールで文字化けし、 Thunderbirdだと文字化けしないのですが、 原因と対応がわかる方がいれば教示いただけませんか。 Shift_JISの5Cなどとは根本的に異なりそうですが・・・ 以下、いくつかテストした文字列です。 「XXX」お問い合わせを受け付けました ↓ Subject: =?iso-2022-jp?B?44CMWFhY44CN44GK5ZWP44GE5ZCI44KP44Gb44KS5Y+X44GR5LuY44GR44G+44GX44Gf?= Gmail：文字化け Windowsメール：文字化け Thunderbird：文字化けせず お問い合わせを受け付けま

plenvやperlbrew等できれいなperl環境を利用している際に，Perl::Critic (例えばエディッタのsyntax checkingに引っ掛けているようなシチュエーション) やLなどの自分の環境でだけ動かすようなモジュールを環境グローバルに入れたくないという場合が生きているとあるでしょう．かと言って複数人で開発していてcpanfileをrepositoryで管理しているようなプロジェクトだとcarton/carmelでインストールするというのも微妙．そういう時にどうするか，と言う時の話です． 僕は雑な人間なので，そういったモジュールを利用したい時は普通にcpanm L​とかやってしまいがちなんですが (なんと前提が崩れた)，真面目にやるときはdirenvを使ってPERL5OPTを設定するようにしています． 例えば $ cpanm -l mydist Lという風に，-lオプシ

% echo w.w.w.google.co.jp|perl -pwe 's/.*\.([a-zA-Z0-9\-]+\.)(com|co\.jp|ne\.jp)/$1$2/' google.co.jp

11月14日（火）にクラウド型ブログサービスMovableType.netのハンズオンセミナーが参加費無料であるようなので紹介。 ウェブサービス型CMS「MovableType.net」を体験！ハンズオンセミナー【11月14日（火）開催】 先日ワークフロー機能が搭載されたウェブサービス型CMS「MovableType.net」ですが、レスポンシブデザインのベーステーマや、サービス版独自の機能などを日々追加しています。 2017年11月14日に開催する MovableType.net ハンズオンセミナーでは、サービスの特長から、簡単なカスタマイズ方法をハンズオン形式でご説明します。CMS選定中・情報収集中の方、ぜひお気軽にご参加ください。 【参加費】無料 【日時】2017年 11月14日（火）14:00〜16:00（受付開始13:50） 【場所】関東ITソフトウェア健保会館（大久保）1F D

初めて参加したperl入学式 自己紹介 始めました。うにと申します。今年になってから、R大に編入してきたものです。 perl入学式は第二回から参加させていただきました。 perl入学式に参加したきっかけ 私がR大に編入する前は専門学校に通っていたのですが、そのとき、中心にやっていたのがC言語、javaでした。正直言うと雰囲気だけで授業を乗り切っていた感はあります。 そして、R大に編入してからは周りを見渡してみると知らない言語がよく飛び交っていました。ここで、折角編入したのだから、自分の得意な言語が欲しい。そこで、お誘いをしてくれたのがアナグラ君です。 perlを学ぶと彼女ができると教えてくれたので受講しました。 このときのperlについては何も知らなかったです。 perl入学式に参加して perl入学式に参加して思ったのがperlってすごいって感じました。このとき、Cしか触ったことのなかっ

エックスサーバー（Xserver）の比較的新しいサーバーで、Movable Type6の「公開キュー」を利用して記事の公開予約をすると、チェック用のメールアドレスに、以下のようなエラーが大量に送信されることがあります。 公開処理自体は正しく行われているようです。 Use of uninitialized value in numeric gt (>) at /home/path/to/mt/tools/../lib/MT/Template/Tags/Asset.pm line 1179. それぞれに対する対応についてまとめます。 Use of uninitialized value in numeric... について Perlの文法チェックが厳格になったことによるエラーです。数値比較を行う場合、必ず初期値を指定する必要があるようです。 予約投稿時にPerlの文法エラーが表示される - M

The Qiita Advent Calendar 2017 is supported by the following companies, organizations, and services.