2022年9月7日（水）に、 Hatena Engineer Seminar #21 をオンライン開催しました。ご参加いただいたみなさま、ありがとうございました。 このエントリーでは、当日のアーカイブ動画や公開資料をご紹介します。 Hatena Engineer Seminar #21 について 発表概要と資料 GraphQLを使い続けて気づいたこと 〜マンガノでの活用事例から〜 - by id:miki_bene Perl でも GraphQL が使いたい - by id:nakaoka3 マルチテナントで GraphQL を使う際の工夫 - by id:mizdra GraphQLでフロントエンドとバックエンドを分離する - by id:magaming はてなが作るマンガアプリのGraphQL導入から活用 ～ コミックDAYSからGigaViewer for Appsへ～ - by
こんにちは、エンジニアの id:mp0liiu です。 8月28日(土)の Learn Languages 2021 というイベントの Language Update というセッションで@charsbarさんと一緒に2018年以降のPerl5やPerlコミュニティの最新動向について話してきたので、そのとき話した内容に補足などしつつ記事にしていきたいと思います。 配信アーカイブはこちらから見れます。 時系列 2019/5/22 Perl5.30 リリース 2020/6/20 Perl5.32 リリース 2020/6/24 Perl7の発表 2021/5/21 Perl5.34 リリース Perl5.30 の変更点 正規表現や文字周りの細かい改善などはありますが、正直めぼしい変更点が見られないです。 Perl5.32 の変更点 isa 演算子の実装 値があるクラスのインスタンスもしくはそのサブ
こんにちは、モバイルファクトリー Advent Calendar 2018 - Qiita の19日目担当の id:neshです。 今日の記事は AppiumでAndroidアプリの自動テストをPerlで書いてみた事についてです。 はじめに この記事では、headless Chromeでお手軽にWebページのE2Eテスト - Mobile Factory Tech Blog で紹介されたE2Eテストを、モバイルアプリで実行する方法を紹介します。 モバイルアプリ向けの自動テストツールは様々あるのですが、Appiumはその中の一つです。 Appiumの公式サイトの紹介記事 に書いてあるように、 Appiumとは、ネイティブ型及びハイブリット型のモバイルアプリ向けに開発されたテスト自動化を実現するためのフレームワークです。 Appiumを使用する事でiOS、Android端末上でテストプログラム
Perl版のOpenCV、Image::ObjectDetectを使った顔認識を試してみました。 まずは顔にエフェクトをかけてプライバシーを守るWebサービスの作り方を参考にMacPorts用にパスを変えて、 ffmpeg・OpenCVのインストール CPANモジュール Imagerインストール Image::ObjectDetectインストール http://search.cpan.org/~jiro/Image-ObjectDetect-0.11/lib/Image/ObjectDetect.pm cpanのinstall Image::ObjectDetectでエラーが起きた。 Checking if your kit is complete... Looks good Writing Makefile for Image:jectDetect cp lib/Image/Object
Object-oriented programming is a big seller these days. Some managers would rather have objects than sliced bread. Why is that? What's so special about an object? Just what is an object anyway? オブジェクト指向プログラミングは、昨今のビッグセラーです。 マネージャーには、薄切りパン(訳註: 良い発明のこと)よりもむしろ オブジェクトを持ちたがる人もいます。 どうしてでしょうか? オブジェクトの、何がそんなに特別なんでしょうか? そもそも、オブジェクトとは一体 何でしょう? An object is nothing but a way of tucking away complex behaviour
Kansai.pm #15 からの熱が冷めないうちに、ということで、@yusukebeさんの「Webサービスのつくり方」でもオススメされていたMojoliciousを使って、簡単なものを書いてみました。あと、ちょうどすぐわかる オブジェクト指向 Perlを読みおわったところなのっでOOPでクラスも作ってみました。 はじめてのWAF、はじめての自作クラス、と初物尽くしですが、こんなレベルでも調べながら試しながらでやってみたら数時間でそれっぽいものはできちゃうよ、ということで。 仕様 IPアドレスを入力して、「逆引き」「国情報」「Whois」のどれかを出力する。 IPアドレス関連の処理はクラスを作って、上記のそれぞれの情報に対応したメソッドを用意。 Mojolicious::Liteを使って１ファイルでシンプルに作成。 見た目は気にしない！ 細かいチェックも気にしない！ コード 1 2 3 4
おはようございます。 若林（@nqounet）です。 Perl入学式のウェブアプリ編では、ファイルのアップロードについては説明していません。 理由は単純で、ファイルの扱い方を説明するには時間が足りないからです…。 とはいえ、画像を表示できるようにしたいというリクエストは多いので、その辺について書いてみたいと思います。 Mojolicious::Lite を使うとファイル1つで完結できるので簡単なのですが、そのために色々と無茶なことをしているので CGI で使いたいというような事情がない限りは Mojolicious を使うほうが良いと思います。 完成品は github に置いています。 複数のファイルがあり、かつ、ディレクトリの構成も重要なので、リポジトリとして用意しています。 適宜お使いください。 なお、画像（に限らずファイルをアップロードできるような）掲示板では、本来はファイルの形式を
HTMLファイルから特定のタグに囲まれている情報だけを抽出したり、リンクだけを抽出したりしたいと思ったので、それを実現するコードを色々調べてperlで作成してみたのでメモしておきます。いわゆるスクレイピングするためのコードです。このコードでは、perlのHTML::TreeBuilderを使いました。 #2014/1/25追記 以下にメモしたコードそのままでは、HTML5で記述されたhtmlファイルから情報を抽出できません。HTML5にも対応したコードはperlでHTML5を解析して情報を抽出するコード（HTML::TagParser版）にメモしたので、見て頂ければと思います。 実行環境と使用したperlモジュール 実行環境はUbuntu12.04 64bit です。 使用したのは以下の２つのモジュールです。これらのインストールはcpanmで行いました。 HTML::TreeBuilder
空っぽが返ってくる？ LWP::Simpleのget()とかでhttpsから始まるURLを取得しようとすると、エラーも何もなく、空っぽが返ってきてしまう場合があります。 これは、そもそもSSL対応のモジュールが入ってない可能性があります。 #!/usr/bin/perl -- use strict; use LWP::Simple; print get('https://www.google.co.jp/'); # 何も出力されない・・！ 尚、get()直後にprint $@するとProtocol scheme 'https' is not supportedみたいなエラーメッセージが確認できるかもしれません。 つまり、LWP::SimpleでSSLがサポートされてない、ということです。 httpsもサポートしてよ！ 基本的にサーバ側に必要モジュールをインストールすると、上記スクリプトで正
Kawa.netxp [Perl] XML::TreePP／Pure Perl実装によるXMLファイル展開モジュール XML::TreePP モジュールは、 XML ファイルを解析してツリー構造の多次元変数（ハッシュ／配列）に展開します。 XML テキストと Perl オブジェクト（ハッシュ＆配列）間の相互変換が可能です。 コンパイル不要の Pure Perl 実装モジュールなので、 プロバイダのレンタルサーバ環境でも .pm ファイル単体のコピーのみで手軽に利用できます。 （Ajax で利用する JavaScript の XMLHttpRequest オブジェクトのように） サーバからの XML ファイルのダウンロード処理にも対応しています。 安定版アーカイブ： XML-TreePP-0.41.tar.gz TARGZ CPAN ←通常パッケージ 最新版ソースファイル： lib/XML/
Perl 5.20にしたら、DBIが何やら不可解な動作をするようになりました。 問題の原因 保存されいてる文字コードがおかしい 解決策 DBD::Pg編 DBD::MySQL 比べると DBIの仕様 DBD::Pgの仕様変更 2017/05/30 まとめ 問題の原因 どうやら UTF8 を扱う機能が増えたみたいです。DBIの接続時のパラメーターにこんなものが増えています。 pg_enable_utf8 => 1 , # 結果をUTF8フラグ付きにする（PostgreSQL） mysql_enable_utf8 => 1 , # 結果をUTF8フラグ付きにする（MySQL） PerlのDBIモジュールで自動的にUTF8フラグを付ける この影響で、PostgreSQL運用のシステムを Perl 5.14 から 5.20 にアップグレードしたところ文字化け発生。また厄介なことをしてくれたものです
Perl › モジュール › here 日本語などのマルチバイト文字をPerlで適切に扱うにはEncodeモジュールを使用します。次の3つのことを覚えておけば多くの場合適切に日本語を扱うことができます。 外部から入力された文字列はEncodeモジュールのdecode関数でデコードする 外部へ出力する文字列はEncodeモジュールのencode関数でエンコードする ソースコードはUTF-8で保存しutf8プラグマを有効にする この解説での用語 この解説では外部から入力された文字列のことを「バイト文字列」と呼ぶことにします。Perlの内部表現に変換された文字列を「内部文字列」と呼ぶことにします。また「バイト文字列」が特定の文字コードで記述されている場合は「UTF-8バイト文字列」「Shift_JISバイト文字列」などと呼ぶことにします。 プログラミングで日本語を扱う場合にその文字列がバイト文字
文字コードとutf8フラグ Perl において、「文字コード」と「utf8フラグ」は別物です。文字コードの話の中で utf8フラグが語られるので、同じもののように思っている人も多いかもしれませんが、別物です。いや、たとえば同じものだとしても、別物だと思った方が理解しやすいと思います。 文字コード は文字とコードのマッピングに名前をつけたもので、utf8フラグは、Perlにおける文字列の扱いに付随するフラグのことです。 たとえば、以下のようなソースコードをレガシーな感じに EUC-JP で書いていたとして、 my $euc_str = 'ソースが EUC-JP なのでここは EUC-JP'; $euc_str には EUC-JP の文字列が格納されています。 これを、utf8フラッグド(utf8 flag on)にしてみます。 use Encode; my $euc_str = 'ソースが
そろそろ浮気せずに言語を極めるべきでは・・・？ と、最近悩み始めた隊長です。 でもでもね。一度試した言語で同じことをするなんて 個人的にはあんまりおもしろくない（＞＜ ） ってなわけで、最近は Java -> Python -> PHP と、パーサー＆スクレイピングを組んできて 今度はPerlなわけですよ。 実はPerlは初めてではありません。なんどか組んだことがあります。 深くは組んだことはありませんが、面白いですよね。この言語も 当時組んだときにはほとんど覚えてはいませんが リファレンスとスカラーの使い方。特殊変数の多さに 苦しめられた覚えがあります。 Perlは書き方が色々ありすぎて、読み辛いっちゃ読み辛い。 しかし慣れてくるとそれがメリットだったりします。 個人的には好きです。Perl しかしまぁ、ほとんど正規表現でしか使っていませんけどね。 あとはLinuxでのワンライナーとか。
Pelletkachels waren ooit eenvoudige apparaten voor verwarming, maar ze hebben een opmerkelijke evolutie doorgemaakt sinds hun bescheiden begin in de jaren ’80 van de vorige eeuw. In dit artikel duiken we diep in de geschiedenis van pelletkachel, bespreken we de belangrijkste mijlpalen en ontwikkelingen op het gebied van subsidiemogelijkheden en werpen we een blik op de transformatie tot moderne en
#!/usr/local/bin/perl use strict; use utf8; use LWP::UserAgent; main(); sub main { my $ua = LWP::UserAgent->new; $ua->timeout(10); my $res = $ua->get ('https://ないしょ.com/'); if ($res->is_success) { print $res->decoded_content; } else { die $res->status_line; } } ↑これを実行すると、次のように怒られます。 [endo@colinux tmp]$ ./foo.pl 501 Protocol scheme 'https' is not supported (LWP::Protocol::https not installed) at ./
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
