関数呼び出しとクラス継承のベンチマーク - Daio Today
関数呼び出しとクラス継承のベンチマーク フレームワークを考えるにあたって、気になる部分のベンチマークを取ってみた。 ポイントは次の３点。 関数の呼び出し方法： Class::func() と Class->func() 形式 クラスを継承した場合のペナルティ： Class->() と SuperClass->() 連想配列への直接アクセスと、アクセサ経由のアクセス ベンチマーク環境: perl, v5.8.6 built for darwin-thread-multi-2level / Mac OS X 10.4 (Tiger) / Apple Computer, PowerBook G4 12", 867MHz, 640MB RAM まず、コード１。 #!/usr/bin/perl package Parent; use strict; use warnings; sub pid { r
Perl公式ドキュメント日本語版
このサイトは Perl の公式ドキュメントを日本語翻訳したものを表示するサイトです。翻訳データは、perldocjp project からとってきたものです。 類似のものに perldoc.jp がありますが、それよりもみやすくなるようにがんばってみました。 ドキュメント一覧 概要(overview) perl - Perl の概要 perlrun - perl コマンドの実行とオプションについて チュートリアル perldebtut - デバッグのチュートリアル perlopentut - Perl でいろんなものを開くためのチュートリアル perlpacktut - pack と unpack のチュートリアル perlreftut - Mark によるリファレンスに関するとても短いチュートリアル perlretut - Perl の正規表現のチュートリアル perlt
mixi の年末年始対策 2009-2010 - mixi engineer blog
こんにちは。パートナーサービス部の加藤和良です。 2008年末に、mixi の年末年始対策について紹介しました。今回は、ここ数年の年末年始対策の歩みと、今年の対策について紹介したいと思います。実をいうと、設計も実装も自分じゃなかったりするのですが、このまま歴史に埋もれていくのも悲しいので、関係各所に取材してみました。 2008年末をふりかえる まずは、2008年末をふりかえってみましょう。 あのころはまだ mixi の機能も少なく、年末年始の負荷は主に日記に集中していました。そこで当時は ID Generator の改善 - mod_perl をあいだにはさんで MySQL への接続本数を減らす 最新情報DBへの書き込みを非同期に - Q4M をつかって負荷を時間軸で分散する という2つを日記に実装したのでした。 しかし、2008年末から2009年のお正月にかけて、mixi はまたも日記に
使っちゃいけない標準モジュール - Articles Advent Calendar 2010 Casual
gfxと申します。 Perlは後方互換性を重視しているので、標準モジュールはめったに取り除かれる事がありません。しかしそれでも、いくつかのモジュールが将来的に取り除かれる見込みです。そのようなモジュールは使用しないほうがいいでしょう。また、取り除かれはしないものの、様々な理由から使用すべきでないモジュールもいくつかあります。今日は、そういった使うべきでないモジュールを紹介します。なお、このエントリの対象バージョンは5.8から5.14を想定しています。 さて、まずは取り除かれるモジュールです。現在のところ、以下の三つのモジュールが5.14でコアから削除される予定です。 Class::ISA Pod::Plainer Switch Class::ISAはクラス階層を直列化するモジュールですが、5.10以降はmroに取って代わられました。5.10未満のバージョン用にはMRO::Compatが用意
use Benchmark ベンチマークに際しての留意点 - hibomaの日記
ベンチマークする時の留意点をあげてみます。ちょと長いけど興味ある人は読んでね。 ファイルを読み込んで操作するコードについて、Perl Best Practiceでは my $code = do { local $/; <$in>} とすることで、ファイルを一気読みすることを薦めている。 これに対して下記は、バッドなやり方として書かれているものです。 my $code; while(my $line = <$in>) $code .= $line; } スカラー文を連結するドット演算子の . （concat）を使っているので、スピードが落ちてしまうからだという。 さて試しに二つのコードをベンチマークしてみます。 #!/usr/bin/perl use strict; use Benchmark qw(cmpthese); cmpthese( 1000 , { 'slurp' => \&rea
iandeth. - Benchmark モジュールの使い方、結果情報の読み方
仕事で Benchmark モジュールを使う機会があったので、使い方＆結果情報の読み取り方をまとめてみました。基本的には perldoc 読めばオールオッケーでしょ？と思っていたのですが、docs では結果情報の読み方についてはあんまり触れられていなかった為、ガッツリ補足してみました。 基本 とある２種類のコードの実行速度を比較計測するには以下のようなソースを記述します： bench.pl #!/usr/bin/perl use strict; use warnings; use Benchmark qw(timethese cmpthese); sub hogeLoop1 { my $str; for my $i (1 .. 10000){ $str .= $i } } sub hogeLoop2 { my $str; for my $i (1 .. 20000){ $str .= $i
1日目レポート［随時更新］ | gihyo.jp
10月15日、16日、東京工業大学大岡山キャンパス (東京都目黒区) でYAPC::Asia 2010 Tokyoが開催されます。本ページでは、1日目のレポートを随時掲載していきます。 ※今回のレポートは全セッションを回れておりません。ご了承ください。 Daisuke Makiさん「Welcome Speech」 JPAの牧さんより、開催の挨拶が行われました。5周年となる今回のテーマは“Welcome Perl”であること、基調講演の発表者をそれぞれ"The Beginnig"、"Current Master"、"The Purple Master"と紹介しました。 また、今回のイベント運営にノンエンジニアの941さんが加わり、運営に尽力されたことが語られました。そのほか、今回のイベントではロケタッチと協力してYAPCのシールを制作したことが紹介されました。 最後に、スポンサーに対
LL Tiger » ビデオ2
当日の模様を動画で公開します。 開会宣言 & Language Update 【ニコニコ動画】[lltiger] 開会宣言 & Language Update (1/3) 【ニコニコ動画】[lltiger] Language Update (2/3) 【ニコニコ動画】[lltiger] Language Update (3/3) 開発ライセンスとプログラマーの自由 【ニコニコ動画】[lltiger] 開発ライセンスとプログラマーの自由 (1/2) 【ニコニコ動画】[lltiger] 開発ライセンスとプログラマーの自由 (2/2) LLと電子出版 【ニコニコ動画】[lltiger] LLと電子出版 (1/2) 【ニコニコ動画】[lltiger] LLと電子出版 (2/2) LLでフィジカルコンピューティング 【ニコニコ動画】[lltiger] LLでフィジカルコンピューティング (1/2)
公式ドキュメント一覧(日本語訳つき) - Perl入門ゼミ
Perl › 公式ドキュメント Perlの公式ドキュメントの一覧です。日本語訳が存在するものはリンクしています。 概観 初心者のためのPerlの入門 (perlintro) 入門 Perlリファレンスの短い入門 (perlreftut) Perlデータ構造入門 (perldsc) Perlデータ構造: 配列の配列 (perllol) Perl正規表現クイックスタート (perlrequick) Perl正規表現入門 (perlretut) 初心者のためのPerlオブジェクト指向入門 (perlboot) Perlオブジェクト指向入門 その1 (perltoot) Perlオブジェクト指向入門 その2 (perltooc) Perlオブジェクト指向 秘訣とサンプル (perlbot) Perlパフォーマンスと最適化のテクニック (perlperf) Perlスタイルガイド (perlstyl
はてなグループの終了日を2020年1月31日(金)に決定しました - はてなの告知
はてなグループの終了日を2020年1月31日(金)に決定しました 以下のエントリの通り、今年末を目処にはてなグループを終了予定である旨をお知らせしておりました。 2019年末を目処に、はてなグループの提供を終了する予定です - はてなグループ日記 このたび、正式に終了日を決定いたしましたので、以下の通りご確認ください。 終了日: 2020年1月31日(金) エクスポート希望申請期限:2020年1月31日(金) 終了日以降は、はてなグループの閲覧および投稿は行えません。日記のエクスポートが必要な方は以下の記事にしたがって手続きをしてください。 はてなグループに投稿された日記データのエクスポートについて - はてなグループ日記 ご利用のみなさまにはご迷惑をおかけいたしますが、どうぞよろしくお願いいたします。 2020-06-25 追記 はてなグループ日記のエクスポートデータは2020年2月28
linuxで httpd が使ってるメモリ総量を調べる話 - kazuhoのメモ置き場
Perl等のLLでウェブアプリケーションサーバを書いていると、普通はマルチプロセスモデル (apache なら prefork とか) で運用することになると思う。で、それらがどれだけメモリを使っているか、っていうのはチューニングにおいて重要になってきたりする (んじゃないかと思う) けど、そもそもメモリの総使用量をどうやって測定するのか。 20:20追記: PSSを使ってワンライナーで測定するのが簡単 (コメント欄参照)。kosakiさんありがとうございます。 $ sudo perl -le 'for my $p (@ARGV) { open my $fh, "< /proc/$p/smaps" or die $!; map { /^Pss:\s*(\d+)/i and $s += $1 } <$fh> } print $s' `pgrep plackup` 914325以下は初回投稿時
mixi大規模障害について - mixi engineer blog
こんにちは。システム本部技術部たんぽぽGの森本です 先日のmixi大規模障害についてのブログです。 はじめにお断りしておきますが、弊社CTOがtwitterで公開した以上の情報はまだ得られておりません。 twitterでは書ききれなかった細部を補足してみたいと思います 現状判明しているのは以下の点です memcachedに大量の接続・切断を行うとmemcachedプロセスが突然終了することがある memcachedには異常時に終了するフローもあるが、同時に出力されるはずのエラーログは出ていなかった coreも出力されていなかった テスト環境にて追試を行ったところ、なんどか再現させることができましたが、確実に発生する条件は未だ不明です。 障害時の memcachedのバージョンは1.4.4, libeventのバージョンは1.3bです memcached の起動オプションは以下のとおり ./
GAC なぜなにGAC->Perl
前回教えていただいたkeyさんありがとうございました。 前回とちょっと似た質問なのですが、 インターネット上で他の人のスクリプトを見ていて こんな文を見つけました。 @values = split(/\0/, $values); これは$values(フォームから受け取ったvalue) が同nameで複数だったとき配列に代入していく文だと思うのですが、 "\0"がなにを意味しているのか教えて欲しいのです。 Googleで検索しようと思っても\のような記号は検索キーと してみてもらえないようで、検索すらできなくて困っています。 このようなときの検索の仕方があれば、そちらでもかまわないので ご教授頂けませんでしょうか?
Date::Calc - 日付の計算
use Date::Calc qw(:all); #今日の日付を取得 ($year, $month, $day) = Today(); #現在のタイムスタンプを取得（形式：2003-06-12) ($year, $month, $day, $hour, $min, $sec) = Today_and_Now(); #現在の曜日を数字にて取得 $day_of_week = Day_of_Week($year,$month,$day); #現在の曜日をテキストにて取得 $string_full = Day_of_Week_to_Text($day_of_week); #今日の曜日をテキスト（省略形）にて取得 $string_abb = Day_of_Week_Abbreviation($day_of_week); #昨日の日付を取得 ($d_year, $d_month, $d_day) =
wantarray関数 - スカラかリストをコンテキストに応じて返却 - Perl入門ゼミ
Perl › 関数 › here Perlではコンテキストという概念があるので、スカラあるいはリストをコンテキストに応じて返却することができます。 sub func_name{ # 処理 ... return wantarray ? リスト : スカラ; } wantarrayを使えば、リストコンテキストの場合とスカラコンテキストの場合を区別して、戻り値を返却することができます。 wantarrayが使われている標準関数にはlocaltime関数があります。 wantarray関数は使わないほうがよい wantarray関数は、非常に発見しにくバグを生み出しだしがちなので、使用することはお勧めしません。たとえば、スカラが返ってくると思って、関数の引数に指定したら、リストが返っていたということが、起こりうるからです。 # スカラが返ってくると思っていたが、実際はリストが返ってきてしまう fu
[Perl] for と foreach は同じ。
配列の繰り返し処理でよく使われる foreach。 実は foreach を for と書き変えても全く同じ動作をしてくれます。 例) 下記のコードは全く同じ処理 foreach my $var (@vars) { print $var; } for my $var (@vars) { print $var; } foreach は for のエイリアスなので、どちらを使ってもOKです。 perldoc にもある通り、読みやすさのために foreach、簡潔さのために for な感じでしょうか。 http://perldoc.jp/docs/perl/5.8.8/perlsyn.pod (Foreach Loops for foreach) 一応ベンチマークを取ってみました。(ついでに個人的によく使う map も) ベンチマークコードです。 #!/usr/bin/perl use stri
Perlドキュメントの読み方
by Hippo2000(2000/8/6) Perlに限らず、プログラム開発においてドキュメントは必要不可欠です。 特にPerlの場合、かなり便利な機能があるのですが、あまり知られていないようです。 ＃というより、私が知らなかっただけか(^^;; ちょっとその辺をまとめてみようと思います。 目次 1. ドキュメントの場所 2. POD形式とその変換 2.1 POD形式 2.2 変換ユーティリティ 3. perldoc 4.. ちょっとした小技 1. ドキュメントの場所 当然すぎるほど当然ですが、ラクダ本（「プログラミングPerl」）が、最も基本的な、そしてもっとも重要な情報でしょう。 しかしPerlの場合、インストールするだけでドキュメントがついてきます。またインターネットから各種の最新ドキュメントを取得することができます。（特にCPANに登録されているモジュールを利用する場合には！）
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
MYSQLの日付関数で、 NOW(),SYSDATE(),CURRENT_DATE()の違いを教えて下さい。…
省サーバ運用
ITのハキダメ