タグ

perlに関するyaakaitoのブックマーク (20)

  • Perl, Python, Ruby の比較

    コードの書きやすさは3つともそれほど違わないように思えます。ただ、読みやすさはダントツで Python が 優れています。Ruby はまずまずで、Perl は書き手の技量による部分が大きいのですが、 一般的には "読めない" コードになりがちです。 現在の人気を無視して、言語そのもののよしあしを考えると、 PythonRuby はほぼ互角でしょう。しかし、今のところ Python の方が、 実行速度が速く、ライブラリが豊富なので、とりあえず Python を使うことにします。 また、Python には対話モードがあるのも Lisp に慣れた人間にとってはありがたいです。 Ruby は今後の健闘に期待します。 5. おわりに 以上 Perl, Python, Ruby の比較をつれづれと書きましたがご参考になりましたでしょうか? 結論は、 Python, RubyPerl に比べ

  • MIME::Parser - メールの解析

  • メールを標準入力として受け取るには - 教えて!goo

    yaakaito
    yaakaito 2009/08/21
    CGIっていうより、perlでってことですよね? perlでの、標準入力の受取りは STDIN から可能です。 > Return-Path: > しかないようです。 $a = とかして、最初の1行しか読みとってないからでしょう。 STDINが終わるまで while ( ) で
  • 受信メールをプログラムに渡すには | Netsphere Laboratories

    (2007.7.18 古い文書をまとめ直し、2007.8.1 新規公開。) Webアプリケーションでは、ユーザの存在確認や、ユーザの投稿の利便性から、メールをプログラムで処理したいことがある。 sendmail, qmail, postfixでは、それぞれやり方が微妙に異なる。簡単にまとめてみた。 まず最初に基的な配送ルールを解説し、その後で拡張アドレス (extension addresses) についても解説する。 sendmail sendmail では、~/.forward ファイルでメールを処理するプログラムを指定する。.forward ファイルには、次のいずれかの形式でプログラム(と引数)を書く。 | program "| program arg" |"program arg" 引数を与える場合は、ダブルクォーテーションで括る必要がある。 1通のメールにつき、プログラムが一つ

  • Perlメモ/Perlでメールを受ける - Walrus, Digit.

    Net::POP3での受信とMIME::Parserでの解析について。 川合氏の「Perlでメールを受ける」を読み解いていった過程でまとめた両モジュールの使い方情報と、同資料で触れられているメール中の日語の取り扱いについての補足情報です。 なお、ActivePerl 5.6系でもPPMで5.411a(2005年2月現在)のMIME-Toolsがインストールできるようになりましたので、同資料ではMIME-Tools5.410以降にあわせて書かれた「1.5 MIME-toolsの最新版への対応+HTMLメールに添付ファイル」を勉強対象にしています。 Net::POP3モジュールを利用できるなら、メールの受信は簡単です。 以下のスクリプトで、メールを受信して単純なファイル名(スクリプトのプロセスID+連番)で保存することができます。 use Net::POP3; # メールサーバとアカウントの

  • Mobile-bozu: mail-entry.cgi説明書

    もばいる坊主・・・和尚の過ごす もばいるな日々と もばいるでない日々 文責:ANAMIZU MASANORI(osho) トラックバックとかコメントとか大歓迎。たくさんください。更新頻度低めですけど〜 このスクリプトを使うと、MovableType(以下MT)へのエントリー登録がメールから行えます。あひるさんが作成されたスクリプト(mail2entry.cgi)に、oshoが改変を加えたものです。画像ファイルを添付することで、画像を含んだエントリーも出来ます。 バージョン0.5.3以降の動作確認はMT3.11で行っています。0.5.2まではMT2.661で確認していました。0.5.3以降もたぶん動くと思います。 現在のバージョンは0.5.3です。(2004/12/4リリース)※0.6.3を公開しています。まだ心配な点が多いため、こちらにはリンクしていません。安定を求める方は0.5.3を

  • BIGLOBEなんでも相談室サービス終了のお知らせ

  • ファイルハンドルと出力 - 2部 Perl言語仕様 - [SMART]

    ファイルテスト演算子の使い方 $file = "/home/httpd/html/index.html"; # ファイルが存在するか確認 if ( -e $file ){ .... } パイプ UNIX 系 OS 全般や、Windows NT といったサーバ OSには、パイプが用意されています。パイプは、プロセス間で通信するために用意された機構で、標準出力と標準入力を経由してデータを受け渡しするためのものです。これによって、一時ファイルなどを経由せずに、ダイレクトにプログラムが標準出力に出力した結果を他のプログラムの標準入力に渡すことができます。 open でパイプ処理 以下では Perl からパイプを使った例を紹介します。ファイル名の先頭に | を付けると、そのファイル名をコマンドとして解釈し、そのコマンドラインへ出力します。 sendmail を使ってメールを送信する例です。 open

    ファイルハンドルと出力 - 2部 Perl言語仕様 - [SMART]
  • ずんWiki - Perlでマルチスレッド

    目的 † 元々はメール配送システムを作ろうとしていた。 そのシステムでは複数の宛先へのメール配送を1通毎に並列にやりたかったし、 スレッドが無限に増えてしまってもリソースを消費しすぎて困るのでそれを制限したかった。 また、相手サーバの事情によっては纏めて数万通とか出すと怒られるときがあるのでメールの配送ペースも調整したかった。 以上がマルチスレッドプログラミングを勉強する目的だった。 ↑ ソース † 上記条件を満たすサンプルが出来たのでメモ。 ダウンロードも出来るようにしておく。 このソースには無駄なコードや、こうした方が良かったとか思うところがいっぱいあるんだが修正するのが面倒い…。 参考にする方は、とりあえず参考にするだけして、自分で色々試して良いと思った方法をとったほうが良いです ithread_test.pl #!/usr/bin/perl use strict; use thre

  • perlthrtut - Perlにおけるスレッドのチュートリアル - perldoc.jp

    名前¶ perlthrtut - Perlにおけるスレッドのチュートリアル 説明¶ NOTE: this tutorial describes the new Perl threading flavour introduced in Perl 5.6.0 called interpreter threads, or ithreads for short. In this model each thread runs in its own Perl interpreter, and any data sharing between threads must be explicit. 注意:このチュートリアルは、インタプリタスレッド(interpreter threads)、 あるいは短くiスレッド(ithreads)と呼ばれる、Perl 5.6.0において 導入された新しいPerlスレッドの

  • Perlの日本語文字コード変換、最速は? | dsegの日記 | スラド

    ふと思い立って、日語文字コード変換処理のペンチマークを取ってみた。 対象は青空文庫から取ってきた、夏目漱石の『我輩はである』のテキストファイル(文字コードはSJIS)。 SJISからEUC、SJISからUTF-8の変換を実行してみる。 変換に使用したモジュールは Encode Text::Iconv Jcode NKF jcode.plの5つ。 NKFは、/usr/bin/nkf利用ではなくて、Perlの拡張モジュールの方を指す。 jcode.pl は UTF-8への変換が出来ないので、後者のテストからは省いた。 # Text::Iconvは最新版の1.4では処理が無限ループに…。 # 何故かは判らないが、1.3ではきちんと動いた。 テストについて、 冒頭のZipファイルをダウンロード、解凍するとneko.txt(731kb)が出来る。 同じ場所に下のスクリプトを保存。 スクリプトをj

  • はてなブログ | 無料ブログを作成しよう

    来年も作りたい!ふきのとう料理を満喫した 2024年春の記録 春は自炊が楽しい季節 1年の中で最も自炊が楽しい季節は春だと思う。スーパーの棚にやわらかな色合いの野菜が並ぶと自然とこころが弾む。 中でもときめくのは山菜だ。早いと2月下旬ごろから並び始めるそれは、タラの芽、ふきのとうと続き、桜の頃にはうるい、ウド、こ…

    はてなブログ | 無料ブログを作成しよう
  • https://osksn2.hep.sci.osaka-u.ac.jp/~taku/osx/perl/perl_utf.html

  • perl の Win32::GuiTest モジュールを使ってみる。 - IT戦記

    はじめに 久々の perl。突っ込まれるのを期待しつつやってみます。 準備 Strawberry Perl for Windows をインストール PATH を通して、コマンドプロンプトを起動して、 > cpan -i Win32::GuiTestでおk。 何から始めよう IE8 をどこまで操作できるかやってみる。 IE8 を起動 use strict; use warnings; use utf8; system('explorer http://www.google.co.jp/'); おおお。 IE8 のウィンドウハンドルを取得 use strict; use warnings; use utf8; use Data::Dumper; use Win32::GuiTest qw(:ALL); # これをやっておかないと中で shift-jis 前提で扱われるみたい UnicodeSe

    perl の Win32::GuiTest モジュールを使ってみる。 - IT戦記
    yaakaito
    yaakaito 2008/12/11
    my ($win, $address_band_root, $address_edit, $url) = do { my (@wins, $win, @address_band_roots, $address_band_root, @address_edits, $address_edit, $url); # IEFrame のウィンドウハンドルを取得 sleep(0.2) while (!scalar(@wins = FindWindowLike(0, undef, '^IEFrame$'))); die 'There should be
  • Perl/日時 - BugbearR's Wiki

    Perl time † Unix 時刻(1970年1月1日0時0分0秒 GMT から現在時刻(GMT)までの秒数)を返す。 閏秒を含むかどうかは、システムに依存する。(要注意!) #!/usr/local/bin/perl print time; ↑ gmtime EXPR † GMT として、EXPR(Unix 時刻)を分解する。 EXPR を省略すると gmtime(time) とみなす。 scalar(gmtime(EXPR)) と評価すると、ctime 形式の文字列("Fri Sep 8 15:24:54 2006" といった感じ)が返る。この時ロケール処理は行われない。 ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime(time); 秒 分 時 日(1〜31) 月(0:1月, 1:2月 〜 11:12月)

  • Cookieの発行、読み込み | beginners CGI

    Cookie の発行の例を簡単なサンプルで見てみます 【書式例】 print <<"HTML"; Content-Type: text/html Set-Cookie: 名前=内容; 有効期限;"; HTML 【例1】 print <<"HTML"; Content-Type: text/html Set-Cookie: name=tanaka; expires=Tue, 1-Jan-2030 00:00:00 GMT; HTML 【例2 複数発行する】 print <<"HTML"; Content-Type: text/html Set-Cookie: name=tanaka; expires=Tue, 1-Jan-2030 00:00:00 GMT; Set-Cookie: pass=0123; expires=Tue, 1-Jan-2030 00:00:00 GMT; HTML #

  • 正規表現 [Perl講座 -Smart]

    正規表現の概要 正規表現は、Perlの中で最も重宝する機能のひとつです。正規表現にはテキスト処理のための様々な機能があり、文字列の中から特定のパターンを見つけ出したり、置換したりすることができます。 正規表現の基的な使用方法 たとえば、$strという変数に格納したデータの中から、「A」で始まって途中は何があるかわからないが最後が「E」という文字列を探したい場合、次のように記述することで、条件にマッチする文字列を見つけることができます。 $str =~ /A.*E/; 上記では、ドット( . )が改行以外の1文字を表し、アスタリスク( * )がその任意の文字の0回以上の繰り返しを意味します。このように、正規表現において特殊な働きを持った文字を正規表現演算子、またはメタ文字と呼びます。また、=~ はパターン結合演算子と呼ばれ、「左辺の値から右辺の値を検索する」という意味があります。 正規表現

    正規表現 [Perl講座 -Smart]
  • Perlリファレンスマニュアル

    <body> </body>

  • http://poizun.jp/content/cgi/reference/

  • 簡単CGI: 環境変数とは

    ■ 環境変数とは 環境変数とは、「情報」です。 サーバ、ブラウザなどの情報が取得できます。 環境変数はCGIでも使うことができます。 %ENVという特別なハッシュ変数を用います。 ハッシュ変数についてはハッシュ変数をご覧ください。 $ENV{'環境変数名'}のようにして呼び出します。 <主な環境変数> ・REQUEST_METHOD サーバへの要求方法。通常GETまたはPOSTです。 ・CONTENT_TYPE 入力データのMIMEタイプ。 ・CONTENT_LENGTH 入力データの長さ。 ・QUERY_STRING エンコードされた入力データ。 ・PATH_INFO パス情報。 ・PATH_TRANSLATED パス情報を、フルパスに変換したもの。 ・SCRIPT_NAME 仮想パス名を含むCGIスクリプト名。 ・DOCUMENT_ROOT ドキュメントルート。 ・REMOTE_HOS

  • 1