Ads

Perlはダサい?

ある日の会話によると、行末にセミコロンがある言語はダサいらしい。

ダサいのは嫌なのでイケてるPerlソースの書き方を考えてみた。

イケてるPerl

頭とお尻に1行追加するだけ。たったそれだけであなたのソースがイケてるソースに!
もうダサいなんて言わせない。

#!/usr/bin/perl
eval `cat \`which '$0'\`|perl -pe's/^.*#!.*//g'|perl -pe's/\n/;/'`, q(

use strict

my $name = "Hanako"
hello($name)

sub hello($) {
    my $name = shift
    print "Hello $name!\n"
    print "Ore Iketeru?\n"
}

#!)

イケてる実行結果

Helo Hanako!
Ore Iketeru?

コメント

  • テスト -- テスト? 2008-03-01 (土) 07:29:36


添付ファイル: fileiketeru.pl 764件 [詳細]

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2008-03-01 (土) 07:29:36 (3939d)