変数に型がないということの利点について考える - Perl入門ゼミ
Perl › 読み物 PHPやPerlやRubyやPythonなどのスクリプト言語に対して、変数に型がないということを否定的にとらえる人もいるかと思います。特にC言語やJavaなどの静的言語を使ってきた人にとっては、型がないということが不安材料として目に映ることが多いのではないかと思います。 けれども、型がないということは、本当に素晴らしいことです。型がないことによって、たくさんの面倒から解放されるからです。 どのような型の値でも代入できる まず基本的なこととして変数に型がなければどのような型の値でも代入できるということです。つまり、受け取るときに、どのような型の値を受け取るのかを意識する必要がありません。 my $str = 'Hello'; my $num = 1; my $nums = [1, 2, 3]; my $person = {age => 2, name => 'taro'
Scripting Languages I: Node.js, Python, PHP, Ruby - Hyperpolyglot
a side-by-side reference sheet sheet one: version | grammar and execution | variables and expressions | arithmetic and logic | strings | regexes | dates and time | arrays | dictionaries | functions | execution control | exceptions | threads sheet two: streams | asynchronous events | files | file formats | directories | processes and environment | option parsing | libraries and namespaces | objects
Perlメモ/CGIモジュール - Walrus, Digit.
フォームデコードなどの機能を持つ、CGI作成者のためのPerlモジュール。 CGIモジュールはHTMLやフォームの生成、フォームデータのパース、Cookieの取得と出力などの機能を持つモジュールです。 いささか重厚長大のきらいはありますが、CGI::Liteモジュールと異なりCGIモジュールは多くの環境でデフォルトインストールされていることなど、CGIモジュールを選ぶべき理由も多くあります。 CGIモジュールには多くのドキュメントが付属しています。 この内いくつかは、Perldoc.jpで和訳した文書を見ることができます。 http://perldoc.jp/docs/modules/ IBMのサイトには「便利なCGIスクリプト作成のためのヒント～CGI.pmモジュールを綿密に検討する」という文書があります。 いささか古いのですが、CGIモジュールを使ったファイルアップローダを検討するのに
多倍長整数演算の速度比較 - まめめも
ruby 、perl 、python の多倍長整数演算の速度を適当に比較してみました。フィボナッチ数の計算速度比較以上にどーでもいい比較です。 前置き 使用した処理系のバージョンはそれぞれ以下のとおりです。 ruby 1.9.0 (2008-01-16 revision 0) perl v5.10.0 python 3.0a2 perl は多倍長整数を扱う方法が何個かあるようなので、標準装備らしい bigint と、別途 CPAN でインストールしないといけない Math::BitInt::GMP (GMP の binding) の 2 種類を試しました。python の psyco はなんか動かなくて面倒だったので試してません。この比較にはあまり影響しないような気がしてます。僕は Perl と Python は素人なので、もっと速くて美しい書き方・やり方があったら教えてください。 実験
第135回 Perlに true, falseなんてない - bingo_nakanishiの他言語出身者のためのPerl入門
あ、そこの君！ だまされたと思ってこれを実行していきなさい。 if( false ){ print "ああああ\n"; } どんな結果になったかね？ そうだ。 ああああこう表示されただろう。 ことの発端 この事実に気づいたのは、あるJS使いから if( !false ){ print "ああああ\n"; } が trueにならないんだけど、どういうこと？ と質問があったからだ。 とあるC言語経験者の発言 そもそもC言語にも true, falseはないよね。 と言うのは、あるC言語経験者の発言。 ブーリアン型 - Wikipedia C言語では、C89 にはブーリアン型が定義されていない（C99には定義されている）。ブーリアン型がない代わりに true/false は 0 かどうかで判断される。 C++では、標準化の過程で bool、true、false というキーワードが導入され、基本デ
Imager::Graph のサンプル - 日向夏特殊応援部隊
今、ちょうど簡単なお仕事でグラフ出さないといけないので、適当に書いてみた。GD::Graph の出力はどう見ても切ない貧弱な表示なので今回は触れない。 #!/usr/bin/perl use utf8; use strict; use warnings; use Carp; use Imager; use Imager::Graph::Pie; my $chart = Imager::Graph::Pie->new; my $font = Imager::Font->new( file => '/path/to/example.ttf', aa => 1 ); $chart->set_style('primary'); $chart->set_font($font); my $img = $chart->draw( width => 500, height => 500, font =>
tips - "%E5%BC%BE" を「弾」にするには? : 404 Blog Not Found
2009年05月01日14:00 カテゴリTipsLightweight Languages tips - "%E5%BC%BE" を「弾」にするには? これ、昨今では最もよく再発明されている車輪の一つかも。 検索サイトなどのURL中に含まれる「％＋１６進」の形にエンコードされた日本語文字列（例えばI%E3%82%B7%E3%83%A1%E3%82%B8I）を、LinuxのCUI上でデコードする簡単な方法は.. - 人力検索はてな 最古の文字コード変換プログラムの一つであるnkfが対応していたとは知らなかった。 JavaScriptで decodeURIComponent()を使えばOKです。以下、例。 Decoded: Encoded: <dl> <dt>Decoded:</dt> <dd><input id="uri.decoded" type="text" size="64" val
tips - 十まで数える二千百一の方法 : 404 Blog Not Found
2009年05月01日18:15 カテゴリTips tips - 十まで数える二千百一の方法 絶望した!誰も「笑」ってないことに絶望した! 斬新な数の数え方を考えた。 - NaokiTakahashiの日記 よく「正」って字を書いて数を数えるでしょ。一画ずつかいて、ひとつで５。 あれを「殺」って字にしたら一文字で１０数えられるんじゃないかとさっき思いついた。十画だから。で、十数えた、じゃなかった笑った後に、気になったわけです。十画の字ってどれだけあるだろうか、と。 こんなにありました。 㑣㑥㑦㑧㑨㑩㑪㑫㑬㑭㒭㓐㓑㓒㓬㓭㓮㓯㓰㔝㔞㔟㕋㕌㕍㕖㖏㖐㖑㖒㖓㖔㖕㖖㖗㖘㖙㖚㖛㖜 㖝㖞㘣㘿㙀㙁㙂㙃㙄㙅㙆㛍㛎㛏㛐㛑㛒㛓㛔㛕㛖㛗㛘㛙㛚㛛㛜㛝㛞㛟㛡㛢㛣㛤㝂㝃㝗㝘㝙㝚 㝶㝸㞂㞗㟇㟈㟉㟊㟋㟌㟍㟎㟏㟐㟑㟒㟓㟔㟕㟖㠫㠬㡇㡈㢃㢄㢅㢆㢇㢸㢹㣢㣣㤟㤠㤣㤩㤪㤫㤯 㤱㤳㤴㤶㤷㤸㤹㤼㤽㦴㦵㦶㧬㧭㧱㧲㧴㧵㧶㧷㧸㩻㩼㪇㪈㪉㪰㪶㪾㪿㫅
第53回 型グロブ - bingo_nakanishiの他言語出身者のためのPerl入門
blessは２引数で - 北海道苫小牧市出身の初老PGが書くブログ このようなご指摘をいただいていた。 正直なところ、 *new = \&Human::new;の部分のアスタリスクは「型ブログ」と呼ばれるものであろうということぐらいの認識しかなく理解していなかった、そんな中、 Web::Scraper - Web Scraping Toolkit inspired by Scrapi - metacpan.org のソースを、ひょんなことから読んでみようとおもって読んでみると、 同じように、 *を使っているところがあった。 どうしようもなくわからないので、友人にきいたところ、 自前で import をしているのでは？ といわれ、調べてみることに。 型グロブ Perlでは頭に、 $ @ % &という文字を付けてスカラー変数や、配列であることを示す。 これはファニー文字と呼ばれている。 ファニ
第56回 クロージャの実践的使いどころ - bingo_nakanishiの他言語出身者のためのPerl入門
あまりPerlでクロージャを使っている例をみたことがなくて（僕の勉強不足もあるだろうけど）、 友人に聞いてみたところ、 コールバックかな。 と言われたので、やってみよう。 コールバック そもそもコールバックとはなにかというと、 なにかの関数に関数を与えると、その与えた関数を呼んでくれる仕組みである。 言葉で説明すると、わかりにくいのでソースを提示する。 use strict; sub call_you { my $code = shift; print '今から君の関数を呼ぶ', "\n"; $code->(); # コールバック; print '呼び終えました', "\n"; } my $f = sub { print '!!呼んで!!', "\n"; }; call_you($f); 結果： 今から君の関数を呼ぶ !!呼んで!! 呼び終えました コールバックを使った関数 では、次のよう
第59回 引数が多いときのための「名前付き引数」 - bingo_nakanishiの他言語出身者のためのPerl入門
何か自分で関数を作っているときなどで、 やけにその関数にもらう引数の数が多くなってしまうときはないだろうか？ そんなときは、なにをどの順でもらうかなど意味のないところで足踏みしてしまったり、 呼び出す方も、ええと第1引数が、あれで第2引数があれで、えーと3番目と4番目はどっちが先だっけ？ みたいなことになってしまう。 そこで、 引数に名前をつける！ 名前をつけると非常にわかりやすくなるし、もらう順番はバラバラ（適当）でもよいのだ！ それを実現するには無名ハッシュを使う。 use strict; sub hoge { my $c = shift; print $c->{'hoge'}, "\n"; print $c->{'foo'}, "\n"; } hoge( {'hoge'=>10, 'foo'=>20 } ); print "---------", "\n"; hoge( {'foo'
第62回 vim入門 part4 - bingo_nakanishiの他言語出身者のためのPerl入門
ちょっと今覚えたので、メモ書きとして。 開いたあとに文字コードを変えて読むには、 :e ++enc=文字コードである。 :e ++enc=EUC_JPなどが例である。 しかし、このファイル文字コードわかんねーんだよなぁ。 なにかなぁ ってときはブラウザで開けるのが一番賢いように思える。
第66回 Perlでじゃんけんゲーム - bingo_nakanishiの他言語出身者のためのPerl入門
Perlでじゃんけんゲームをつくりました。 勝敗を決めるアルゴリズムが違う2パターン作りました。 じゃんけんプログラム その1 使い方 プログラムの引数に、 グー, チョキ, パー のいずれかの文字を与えて起動 勝負の判定方法 勝負の全パターンを書いて場合わけ ソース 1 use strict; ################################### # 入力チェック ################################### if( 1 != int @ARGV ){ die '引数の数が正しくありません'; } if( !( ( $ARGV[0] eq 'グー' ) || ( $ARGV[0] eq 'チョキ') || ( $ARGV[0] eq 'パー') ) ){ die q{引数は、'グー', 'チョキ', 'パー'でなければいけません}; } ###
第71回 Javaの例外処理の構造（文法的なお話） その2 - bingo_nakanishiの他言語出身者のためのPerl入門
それでは、try{ } catch { } の構造を使うと、 どのようにプログラムが流れていくのか見てみよう。 public class Hoge { public static void main(String[] args) { try { badMethod(); System.out.println("例外起こらないでー"); } catch (Exception e) { System.out.println("例外処理った"); e.printStackTrace(); } System.out.println("ここまでこれるかな"); } private static void badMethod() throws Exception { throw new Exception(); } }結果： 例外処理った java.lang.Exception at Hoge.bad
第73回 例外の伝搬のさせ方 - bingo_nakanishiの他言語出身者のためのPerl入門
Java 同じものをthrowした場合 public class Hoge { public static void main(String[] args) { try { giveUp(); System.out.println("main() : 例外起こらないでー"); } catch (Exception e) { System.out.println("main() : 例外処理った"); e.printStackTrace(); } } private static void badMethod() throws Exception { throw new Exception(); } private static void giveUp() throws Exception { try{ badMethod(); } catch (Exception e) { System.
第74回 Error::Simple - bingo_nakanishiの他言語出身者のためのPerl入門
第64回 Error.pm でちょっとハマったので - bingo_nakanishiの他言語出身者のためのPerl入門 ここで、dieされたものは、Error::Simpleにblessされたハッシュであることを述べた。 print $e ハッシュであるにもかかわらず、次のように書ける。 use strict; use Error qw(:try); use Data::Dumper; try { die 'aaaa'; }otherwise{ my $e = shift; print Dumper $e; print $e; }; 結果： $VAR1 = bless( { '-file' => 'd.pl', '-text' => 'aaaa', '-line' => '7', '-package' => 'Error' }, 'Error::Simple' ); aaaa at d.
第75回 tie - bingo_nakanishiの他言語出身者のためのPerl入門
Perlには、摩訶不思議な機構 tieが存在する。 今、 何か変数に代入されると同時に、その代入された内容がファイルに書き込まれることで、 その変数の変化の様子をログに落とし込むことを考える。 つまり、 $hoge = 3;とあれば、摩訶不思議な機構により、ファイルに 3と追記されるのである。 このようなことができるのがtieである。 ビンゴ中西のほげほげPerl で遊んでみる その１ ここに簡単にサンプルソースを示してある。 tieは、関数を勝手に呼び出す仕組みを変数にくっつけるのである。 例えば、 = が呼ばれたら、 STOREという関数が呼ばれるのである。 このように処理に対して、呼ばれる関数が決まっているので、 その関数を実装すればいいようになっている。
スクリプト言語文法比較 perl / php
お品書き ● 文法(スクリプト編) ● 文法(メジャー編) ● PHPよくつかう関数 ● YGS2Kリファ ● なんでも掲示板 ● リンク ● 裏リンク ● てりリン カテゴリ ● :Prog ● :UNIX 最新の10件2007-12-03リンク 2007-10-22裏リンク 2007-10-01飛鳥ももこ 2007-09-30GCCで開発 2007-08-10DでAudiere 2007-07-02なんでも掲示板 2007-06-28TeriyakiWiki 2007-01-12BCCで開発 2006-12-26言語文法比較 2005-10-15PHPよくつかう関数 出口 ● ここのTOP ● ここの日記 ★：外部リンク
Perl正規表現雑技
このページは Perl5.6 を対象としています． perl スクリプトは EUC-JP で書かれることを想定しています． このページは 正規表現メーリングリスト を参考に，私が独自にメモとしてまとめたものです． このページの正規表現やスクリプトについての詳しい説明， わかりやすい説明はおそらくできません． このページに書かれているスクリプトは， 個人の責任において実行してください． このページに書かれているスクリプトの 利用・改造は自由 です． その際はどこかにこのページの URI( http://www.din.or.jp/~ohzaki/regex.htm )を参考として記述していただければ幸いです(任意)． ご意見・ご感想・ご要望などは にお願いします．こう書いた方がいい， 動かん，わからん，バグってる，これ書け，などなどお待ちしています． このページへの リンクは自由 に張ってく
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
Index of /src/unsupported/4.036