きのこカンファレンスの前夜祭で、 わいとんさんと、Perlの生きのこりと題して、登壇しました。内容は、1990年頃のPerlのCGIから、2025年現在までの歴史を駆け上がり、ClaudeでPerlのコードを生成する内容です。貴重な機会をいただき、ありがとうございました！ ここではClaudeによるPerlコード生成に関して、落ち穂拾いしたいと思います。 speakerdeck.com github.com Claudeは、Anthropic社によって開発された生成AIツールです。登壇では、Claude Desktopを利用して、インターネット掲示板に更新、削除のAPIを生やすデモをしました。プロンプトは以下の通りです。（正確には、この用意したプロンプトと違ったプロンプトを投げていたことに登壇後に気づき、焦りました😇 本来お見せしたかったものを共有します。） このプロンプトを投げ込むと期

こんにちは、エンジニアリングマネージャーの id:onk です。 Hatena Developer Blogの連載企画「卒業生訪問インタビュー」では、創業からはてなの開発に関わってきた取締役の id:onishi、CTOの id:motemen、エンジニアリングマネージャーの id:onkが、いま会いたい元はてなスタッフを訪問してお話を伺っていきます。 id:onkが担当する第12回のゲストは、株式会社Flatt Securityでセキュリティエンジニアとして活躍するid:akiymさんこと、秋山卓巳さんです。 2017年にはてなに新卒で開発エンジニアとして入社し、受託系のWeb開発などを中心にご活躍いただきました。 2021年にはてなを卒業後、2021年9月、株式会社Flatt Securityに入社し、セキュリティエンジニアとして、主にWebアプリケーション診断やFirebase診断な

YAPC::Hakodate 2024でのトークです https://yapcjapan.org/2024hakodate/

YAPC::Hiroshima 2024にゲストスピーカーとして参加いただく曽根壮大（@soudai1025）さんと、YAPC::Hiroshimaのスタッフであるpapix（@__papix__）が、中四国地域のIT技術者コミュニティの様子やYAPCの思い出・魅力、YAPC::Hiroshimaへの参加を考えている方に向けての思いなどについて、座談会形式で語り合いました。聞き手はtoya（@toya）です。 曽根壮大さん（左）とpapix（右） 初のプログラミング経験と、データベースを専門分野としたきっかけ 初めての“YAPC”参加で「ベストトーク賞」を獲得 Perlコミュニティとのつながりと広がり ベストトーク賞の裏側――勉強会駆動の学習方法 トークの楽しさ、コミュニティの楽しさ 中四国地域のITコミュニティとYAPC::Hiroshimaのチャレンジ 関連記事 初のプログラミング経験

それぞれのトピックを簡単に説明させていただきます。 コンテナベースイメージ 元々CentOS 7をベースイメージとしていました。 2015年当時としては新しく、長年使わせてもらっていろいろありがたい感じだったのですが、 当時は Docker Compose なども無くいろいろと過渡期であったため オンプレ時代の思想を大きく受けており、一つのコンテナに全部入りとなっていました。 例えば、Perlの公式イメージに変えるかどうかも考えたのですが、一部のミドルウェアに影響がありそうだったため、無難にRHEL系を続投する事にしました。 CentOS 8は一足先にEOLとなりましたが、 CentOS 7のEOLも 2024-06-30 と近づいており、 そろそろ乗り換えを検討しないとまずいと考え、悩んだのですが AlmaLinux 8 を選択しました。 と言ってもここについてはほとんど問題もなく、意識

リスト処理に有用な関数群を収録している Perl モジュール List::Util はコアモジュールであり、原則的にどの Perl 環境でも同梱されています。 とはいえ、Perl のバージョンアップに伴って、同梱されている List::Util もバージョンアップしており、収録されている関数にも差異があります。2010年前後の古い Perl だと外部モジュール List::MoreUtils を別途インストールしないと出来なかったことも、2020年代の新しい Perl であれば List::Util のみで完結することもあります。 以下、Perl のバージョンと、それに同梱されている List::Util のバージョン、そしてその List::Util が提供する関数一覧を表にしてみました。なお Perl 5.8 より前のバージョンの Perl は省略しています。 Perl List::U

Perl に substr という関数があります。文字列を部分的に切り出したり、部分的に置換できる関数です。 典型的な使い方はこんな感じ、 my $s = 'The black cat climbed the green tree'; # 4文字読み飛ばしてから5文字取り出す my $color = substr $s, 4, 5; print $color; # => 'black' # 14文字読み飛ばしてから7文字分を別の文字列で置換する substr $s, 14, 7, 'jumped from'; print $s; # => 'The black cat jumped from the green tree' さて、Perl 界隈で有名な書籍「初めての Perl」を読んでいたら、この substr 関数について次のように書かれていました。 ここで本当に素晴らしい機能を披露しま

YAPC::Kyoto 2023で熱が高まってきた(?)ので, 唐突ですが7月〜8月辺りの休日に湘南.pmをやります. なぜ湘南なのかと言うと, 自分が現在藤沢に住んでいるので湘南エリアで開催すると便利だからです. おそらく藤沢近辺*1で開催することになりそう...? 7月〜8月の休日のどこかで https://t.co/XQkcteoxCc 開催しようと思うんですが, 会場のキャパどうするか悩んでいるのでアンケートにご協力ください!!!!— 技術王者papix (ChatGPT評) (@__papix__) 2023年5月29日 まずは会場のキャパをさっくり見積もりたいので, アンケートを実施中です. ちょっとでも興味を持った方は是非回答お願いします!!!!!!!!! *1:湘南 - Wikipediaによると, ｢一般的には平塚市を中心とした相模湾沿岸5市町（藤沢市から中郡二宮町まで）

チーフエンジニア兼エンジニアリングマネージャのid:taraoです。先日開催されたYAPC::Kyoto 2023にはたくさんの方にご参加いただけまして、ありがとうございました。 トートバッグに書かれたPerlコード YAPC::Kyoto 2023には、はてなもスポンサーとして参加しており、会場で配布されたトートバッグのデザインも提供していました。そのバッグの片面にPerlのコードが書かれていたことにはお気づきいただけたでしょうか? コードを書き写すと以下のようになります。 use feature qw(try); try { Something->new; } catch ($your_dream) { tell $your_dream and seek our $future, @ YAPC::Kyoto, 2023; } 今回のカンファレンスのテーマは「try/catch」だったの

資料は こちら です。 背景 アーキテクチャ的に何かを足したいとき、我々はチーム開発を行っているのだから、チームの共通認識を変えるということになる。認知負荷が高い場合は提案を拒否されてしまうので、認知負荷をできる限り小さくして導入したい。つまり差分の最小化です。*1 現在のコードベースと、入れたいアーキテクチャを対比させつつ、こう導入するのがベストと見切るところが今回のトークの面白ポイントです。 PoEAA のデータソースのアーキテクチャに関するパターン PoEAA は 20 年前の本なので、当時の開発風景を想像できる人と会話しながら読むと良いです。エリックエヴァンスの DDD 本も似た時期ですね。2002 年は Java 1.4 がリリースされた頃。デザインパターンや UML や XML が流行っていた。ライブラリのパッケージマネージャやセントラルリポジトリがまだ無い。*2 再利用性があ

普段仕事で Perl を書いている。 Perl はモジュールを利用するために use 文を書く必要がある。 モジュールを足すごとに use 文を忘れずに書くのは意外と大変で「use漏れ」というコミットをこれまでたくさん積み重ねてきた。 この作業を自動化するために、過去には VSCode で自動でインポートする拡張機能を作った。 marketplace.visualstudio.com しかし、以下の課題があった。 普段使っているのが IntelliJ (作った当時はVSCodeに移行を試みていた)でメンテナンスする気分になれない TypeScript で頑張ってパースしているが Perl の自由度に敗北している エクスポートされているシンボルを静的解析するのに限界がある このように動的に作られたりするとどうしようもない そこで、それぞれの課題に対処する新たな自動インポートツールを作ろうと考

2016年に書いたDDPのスニペットを6年間大切に使いまわしていたのだけど、Data::Printerは.dataprinterというファイルに設定ファイルを置くことで、デフォルト値を設定することができる。 リポジトリトップに置く.dataprinterというファイルに以下の設定を書いておいて、 show_unicode = 1 use_prototypes = 0 エディタ用のスニペット（.vscode/perl.code-snippets）は、pを出力するだけ。 { "DDP": { "prefix": "p", "scope": "perl", "body": [ "use DDP; p $1;" ], "description": "DDPによるダンプ" } } 実際に上記スニペットを出力するとこんな感じで、オプションがずらずら挿入されず、スッキリしていて、日本語も表示するなどのカ

これははてなエンジニアアドベントカレンダー2022 42日目の記事です。 昨日は id:k-murakami0609 さんの 過去に所属してたチームに転生したら導入したいもの でした。 はてなのノベルチームで日常的に使っている便利グッズ最高ですね!! みなさんもノベルチームにjoinして体験してください!!! さて今回は2022年にぼちぼち始めたCPANモジュールのメンテナを引き継ぐ活動についてお話しようかなと思います。 CPANモジュール CPANモジュールとはご存知プログラミング言語Perlのモジュールシステムのことです。 Perlインタプリタに付随しているコアモジュールも含めて、PerlではCPANと呼ばれるアーカイブにモジュールがアップロードされ、cpanmやcpmなどのツールを通してインストールし利用する世界観になっています。 TeXのモジュールアーカイブのCTANに影響されて作

YAPC::Kyoto 2023実行委員会の id:papix です. 昨日, YAPC::Kyoto 2023の公式サイトを公開したところですが, 本日より早速スピーカーの募集を行います! forms.gle 上記のフォームよりご応募ください. なお, 一番大切なことを最初に述べておきますと, 応募締め切りは 2023年1月20日(金) 23:59 (JST) となります(締め切りから1週間を目安にメールにて採択結果をお知らせします). ...さて, YAPC::Kyoto 2023のテーマは, 昨日もご紹介したように｢try/catch｣です. そこで, 次のようなトークが集まればいいな...! と, 運営スタッフ一同心待ちにしています: いままで使ってきた、そしてこれから使っていくPerlの話 こんな場所で役に立つ！ Perlで取得した技術 Perlと出会った事で広がった技術やコミュ

これは Perl Advent Calendar 2022 16日目の記事です。 昨日の記事は@hkunoさんのぜんぜんわからない。俺達は雰囲気で perl -p -i.bak をやっている でした。 Test2::Suiteの is 関数とTest2::Tools::Compareに登場する比較関数を組み合わせると、ネストしたデータ構造のチェックを(伝統的なスクリプト言語にしては比較的)分かりやすく記述できます。 cpm install Test2::Suite サンプルコードです。 ステートレスな関数を中心に設計しているなら、道具立てとしては十分でしょう。 ▶クリックで展開 #example.pl package main; use strict; use warnings; use utf8; use Test2::V0; package Foo; sub new { my ($cl

こんにちは。エンジニアのid:kfly8です。 先日、技術研修のインタビュー記事を公開し、手を動かしつつ、コミュニケーションをよく取る技術研修といった主旨の内容でした。 tech.mobilefactory.jp こちらのインタビューでは具体的な研修内容は触れていませんでした。今回は、駅メモ！や駅奪取といった位置ゲームや着メロの月額コンテンツサイトなどで利用しているPerlの技術研修について紹介します。ブロックチェーン事業ではフロントエンド、バックエンドの両サイドで、TypeScriptを利用しているのですが、そちらの技術研修の話は追い追いできればと思います。 tech.mobilefactory.jp 技術研修を受ける人は、どの言語でも良いのである程度プログラミング言語に慣れてることを想定しています。そのため、学ぶ意味、特徴は何か、良教材は何か、罠は何か、などポイントを掻いつまむように技

こんにちは。 最近業務でPerlを使い始めました、id:CNaanです。 Perl歴2ヶ月ほどとなりましたが、Perlをはじめて1ヶ月の頃に躓いた話をします。 これから話す内容は、先日Perl未経験の新卒エンジニア1名に解かせてみたところ、引っかかったので、初心者*1は引っかかりやすいポイントだと思います。 同じ引っかかりをするかな(したら共感があるな)、という気持ちを込めて、本題までゆっくりと話していきます。 やっていくぞ まずは、こちらをご覧ください。 use strict; use warnings; sub get_english_to_japanese { return +{ apple => 'りんご', phone => '電話', }; } はじめにPerlが知らない人向けに言っておくと、strictとwarningsは、滅茶苦茶なソースコードの誕生を避けるために宣言すべき