株式会社VOYAGE GROUP株式会社VOYAGE GROUPは、2022年1月、株式会社CARTA HOLDINGSと合併いたしました。 関連リリース：CARTA HOLDINGS、基幹グループ会社のCCIおよびVOYAGE GROUPと統合へ https://cartaholdings.co.jp/news/20210513_01/ CARTA トップへ
memcachedのステータスをtop風に·memcache-top MOONGIFT
最近のWebシステム開発ではキャッシュを使うケースが増えつつある。各種Webアプリケーション向けフレームワークでもキャッシュをデフォルトでサポートしているものも多く、その筆頭に挙げられるのがmemcachedだ。 top風にmemcachedのステータスが確認できる memcachedは軽量で、あると便利だと思える機能が殆ど実装されていない。ステータスを監視するような機能もないが、そこは独自に開発されたmemcache-topを使えば解決する。 今回紹介するオープンソース・ソフトウェアはmemcache-top、memcachedのステータスを表示するコマンドラインスクリプトだ。 memcache-topはPerlで作られたスクリプトで、既に立ち上がっているmemcachedサーバを一覧し、そのステータスを表示してくれる。デフォルトで3秒ごとにリフレッシュされるようになっており、topコマ
carp - エラーの警告 (呼び出し元の観点から); cluck - スタックバックトレースを伴うエラーの警告 (デフォルトではエクスポートされません); croak - エラーを出してdieします (呼び出し元の観...
名前¶ carp - エラーの警告 (呼び出し元の観点から) cluck - スタックバックトレースを伴うエラーの警告 (デフォルトではエクスポートされません) croak - エラーを出してdieします (呼び出し元の観点から) confess - スタックバックトレースを伴ってdieします shortmess - carpとcroakが生成するメッセージを返します longmess - cluckとconfessが生成するメッセージを返します 概要¶ use Carp; croak "We're outta here!"; use Carp qw(cluck); cluck "This is how we got here!"; print FH Carp::shortmess("This will have caller's details added"); print FH Car
PerlでTwitterのBotを作ってみる - As a Futurist...
Perl なんて触ったことない人ですが、とりあえず動いたのでメモ書き。とは言え、 「作ってみる」なんてのは嘘で、ほぼコピペです。すみません m(_ _)m 基本方針 参考ページ [プログラミング]北海道開発オフで Twitter bot を作ったよ | コマネタ帳 基本的にここのスクリプトを動かすことしかしてません。いようつさんありがとうございます。 さて、Twitter から呼びかけを読み込むには「API」「Web ページ」「IM」の 3 通りがあります。 API は制限がうざい、Web ページは変更の可能性がある、ということでとりあえず IM 経由。 つまり、Bot のアカウントで IM を登録しておき、そこからメッセージを取得することで スクリプト内に発言をげとしてしまう感じです。 続いて Bot が発言する方は API を利用します。こちらも IM 経由にしたり、Web ページにし
MeCabで、キーワード抽出 - プログラマでありたい
形態素解析器として圧倒的な性能を誇るMeCabですが、出来る事は形態素解析にとどまりません。公式ページにも載っているように、辞書さえカスタマイズすればひらがな⇔カタカナ変換やAutoLinkの作成といったことまで出来ます。 WikipediaのデータとMeCabを使えば、高速なキーワード抽出が出来ないかなと思い試してみました。辞書の定義にコストを書けば、長いキーワードを優先して抽出する最長一致法が出来そうです。それが出来れば、辞書にキーワードを登録すればおっけいかなと思い実験です。 準備 ・Mecabのインストール 省略 ・Wikipediaのダウンロード wikipediaからコーパスの作成を参照 ・辞書生成用のCSV作成 xml2sqlで作ったpage.txtを変換します。 この際、(曖昧さ回避)は除いておきます。 併せて、カンマが入っている見出し文は、別のものに置き換えておくこと c
perl 特殊変数 - kozy.heteml.jp
よく使う「$_」 † 各処理時のデフォルト変数。 例： # $_を使ったforeach文 foreach ( @key ) { print; } # 省略しない場合のforeach文 foreach $_ ( @key ){ print $_; } ↑
perldelta - perl 5.10.0 の新機能
perldelta - perl 5.10.0 の新機能 perldelta - what is new for perl 5.10.0 名前 NAME perldelta - perl 5.10.0 の新機能 perldelta - what is new for perl 5.10.0 説明 DESCRIPTION このドキュメントでは 5.8.8 リリースと 5.10.0 リリースとでの相異点を 説明します. This document describes the differences between the 5.8.8 release and the 5.10.0 release. 5.10.0 でのバグ修正の多くは既に 5.8.X メンテナンスリリースで見ることができます; それらはここには重複しないで, perl58[1-8]?delta の マニュアルページ群に記載し
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
PerlIO Layer で複数のオプションを使う - odz buffer
PerlIO::gzip を使うと、 open my $fh, '<:gzip', $filename or die; で、gzip 圧縮されたファイルを直接扱える。これと open my $fh, '<:encoding(utf-8)', $filename or die; なエンコーディング指定を同時に指定するにはどうすれば良いかと聞かれたんだけども、そんなことをしたくなったことがなかった知らねー。 てことで、ちょっと試してみると。 open my $fh, '<:gzip:encoding(utf-8)', $filename or die; な感じでいいっぽい。:gzipと:encoding(utf-8)の間にはスペースが入っても良いみたいだけど。 で、ついでにPerlIO::viaを使えば PerlIO Layer に直接フィルタモジュールを挟みこめるということを、初めて知った。
よいサブルーチンを作成するための心がけ。★★★ - サンプルコードによる Perl 入門
Perl › サブルーチン › here サブルーチン作成に関するわたしの考えを殴り書きしました。 見出し 引数と戻り値について理解する。 小さなサブルーチンを作成する。 サブルーチンに柔軟性を持たせる。 呼び出しの階層を浅く保つ。 機能を実現するサブルーチンを作成する。 ユーザーを意識する。 将来を楽にすることを考える。 完全な抽象化は求めない。 1. 引数と戻り値について理解する サブルーチンを理解するためには、引数の受け取り方と、戻り値の返却のし方を覚えれば十分です。なぜなら、引数を受け取ってから、戻り値を返却をするまでは、今まで学習したプログラミングとなんら変わることがないからです。引数と戻り値の扱いを、覚えたら、すぐに実践に移りましょう。 サブルーチン作成で、難しいのは、以下の4点です。 何をサブルーチンにするか どのような名前をつけるか 引数を何にするか 戻り値を何にするか 正
特殊変数一覧 [Perl講座 -Smart]
特殊変数一覧 ※強調した特殊変数はよく使われるものです。 グローバルな特殊変数 グローバルな特殊配列と特殊ハッシュ グローバルな特殊ファイルハンドル グローバルな特殊定数 パターンマッチに関する特殊変数 ファイルハンドルに関する特殊変数 グローバルな特殊変数 $_ use English: $ARG デフォルトで入力やパターンマッチの対象になる特殊変数です。 $. use English: $INPUT_LINE_NUMER / $NR [入出力関連] ファイルハンドルの現在の行数 ※ファイルハンドルを明示的にクローズすると行番号もリセットされます。 $/ use English: $INPUT_RECORD_SEPARATOR / $RS [入出力関連] 入力時のレコード区切り文字 デフォルト値は改行文字です。 $/ の使い方 $/ を未定義値にすると、ファイルの内容を一度に読み込むこ
perltoot - トムによるPerlオブジェクト指向チュートリアル パッケージ モジュール
名前¶ perltoot - トムによるPerlオブジェクト指向チュートリアル 概要¶ 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
Perl-users.jp - 日本のPerlユーザのためのハブサイト
Perl Mongers Perl Mongers とは、日本各地に存在する、Perl ユーザーのコミュニティのことです。各種イベントが行われていますので、是非参加してみましょう。 Shibuya.pm Fukuoka.pm Kansai.pm (@kansaipm) Yokohama.pm (@yokohamapm) Hokkaido.pm (@hokkaidopm) Nagoya.pm (@nagoyapm) Kushiro.pm (@kushiropm) Kyoto.pm (@kyotopm) Kamakura.pm Niigata.pm (@niigatapm) Sendai.pm (@sendaipm) Tokyo.pm Hachioji.pm (@hachiojipm) Chiba.pm (@chibapm) Yomitan.pm (@yomitanpm) Machida.pm
Perl-5.8 MEMO
Perl-5.8 覚え書き Last Updated at $Date: 2005/12/04 04:00:59 $. このページは，Perl-5.8.2 を使う上で困ったことなどの覚え書きです． 日本語を含むスクリプトを書く 日本語 EUC でスクリプトを書く UTF-8 でスクリプトを書く 日本語を含むファイルを開く 連想配列で日本語を使う 日本語を含む正規表現 文字コードの自動判定 古い Perl でも実行できるように書く 未解決の問題 日本語を含むスクリプトを書く Perl-5.8.x で日本語を扱うスクリプトを書く場合，大きく2通りの方法があります． 日本語 EUC でスクリプトを書く． UTF-8 でスクリプトを書く． どちらの方法でも， (1)ファイル入出力， (2)データベースアクセス， (3)プロセス間通信の3つに気をつけて， 明示的にバイト列を文字列に変換したり，また逆
LWP::UserAgent - WWW ユーザ・エージェント クラス
Hippo2000 (2000/7/28) LWP::UserAgentモジュールなのです。 作者はGisle Aasさんです。メールで許可をいただきました。 2001/6/21：山宮隆さんからの指摘を受けて、余分な「；」を削除しました。 目次 名前 概要 説明 メソッド 参考資料 著作権 名前 LWP::UserAgent - WWW ユーザ・エージェント クラス 概要 require LWP::UserAgent; $ua = LWP::UserAgent->new; $request = HTTP::Request->new('GET', 'file://localhost/etc/motd'); $response = $ua->request($request); # or $response = $ua->request($request, '/tmp/sss'); # or
YouTube API を使ってみる。 - NOBODY:PLACE - MUTTER
はてなブックマークなんかだと、 YouTubeのブックマークの横に、サムネイルが出てますね。 こんな感じ これをブログからやりたいなぁ、と思ったわけです。 ていうかどうやってやるんだろうか、と。 ぶっちゃけ、MovableTypeだったら、 そんな感じのプラグインを作っている人はいくらでもいそうですが、 （[youtube:VXmNJhqngyM]とかでサムネイルつきリンクを貼るとか） まぁ、APIのアレも兼ねて少し自分で見てみましょう、と。 そのvideoのidを渡してやれば、解決します。 それが返してくるデータの中にサムネイルへのアドレスがあるためです。 [YouTube API]get_details - フラッツ ブログ YouTubeのAPIを利用するためには、まず、developer IDを取得します。 developer IDは、 YouTubeの
Perl で 8ビット CPU を作る - naoyaのはてなダイアリー
CPU を作る、と言ってもハードではなくソフト、仮想機械です。 2001 年から UNIX USER で連載されていた西田亙さんの「gccプログラミング工房」。いまさらながら、バックナンバーを取り寄せて初回から順番に読んでいます。とてもためになる連載です。 この連載中で第10回から数回に分けて開発されていた octopus という 8 ビット CPU の仮想機械があります。オリジナルは C 言語で書かれていたのですが、その設計を見て、これは他の言語でも作れるのではないか、と思い Perl に移植してみたところなんとか動作させることができました。以下の URL にコードを公開します。(西田さんに確認を取ったところ、オリジナルのソースは Public Domain とのことでした。オリジナルは http://www.skyfree.org/jpn/unixuser/ からダウンロード可能です。
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://www.gimmix.org/max/article.php?id=706
Singletonとは コンピュータの人気・最新記事を集めました - はてな
GitHub - livedoor/Sledge: ancient Perl Web Application Framework.
