それってone-linerで。

UNIX 系のコマンドで、tac というのがすごく便利なのです。 これはファイルを先頭から表示する cat というコマンドの逆で、 ファイルを行単位でひっくり返して末尾から表示してくれるのです。

そのネタは既出でっせ。

この発想はなかったな。コーヒーは何色？ときいて「水色！」と答える人がいたらギークかもしれません。

• ITというか、プログラマ向きなカフェの店名 - hajimehoshi - はてなハイク
• ITというか、プログラマ向きなカフェの店名 - dankogai - はてなハイク

まあ、ruby のコマンドラインオプションって、Perl由来ですから。

まぁ、Perlもあるしあんまり需要が無いのかも知れませんが。

というわけで、Rubyistにも役立つPerlのワンライナー入門です。

IE専用というのが好かん。

• CodeZine：Webページに含まれるURLを抽出し、Excelにまとめて保存する（HTA）

というわけで、こんなのを。

を妄想してみた。

花嫁募集

shinhさんから遠回しな花嫁募集のお知らせが

> seq 1 1000 | sed 's/[^0]//g;/0/{:;x;s/$/_@0123456789_0/;:a;s/^_/1/;s/\(.\)_\(.*\)\(@.*\1\(_*.\).*\)/\4\2\3/;ta;s/@.*//;x;s/0//;/0/b};${x;p};d'
> こんなワンライナー書く人がいたら求婚する。

ギークなお姉さんはPHPなんかやらないで、sedを勉強するべきですよ。

Array.map()はSafariにはないのでより素直な別解。

'#' + [76, 84, 105].map(function(i){ return (i >> 4 ? '' : 0) + i.toString(16) }).join('')

梅雨です。空梅雨だけど。

こういう時にはDRYよりWET (Waste of Efficiency and Time)を指向したいものです。

FizzBuzzにももうええかげん食傷してきたので、次のネタをないかと思ったら、yuguiさんがtwitterで私を登録したので、ごぶさた〜と思ってblogを見に行って格好の素材を(再)発見したという前回までのあらすじ。

これを見て思い立ったのだけど....

1から100までの数をプリントするプログラムを書け。ただし3の倍数のときは数の代わりに｢Fizz｣と、5の倍数のときは｢Buzz｣とプリントし、3と5両方の倍数の場合には｢FizzBuzz｣とプリントすること。

一行で書き下ろせる問題はぶくマで答えるというのはどうか。

• はてなブックマーク - 404 Bookmark Not Found / 2007年05月08日

「ウノウラボ Unoh Labs: コマンドラインで作業する上で知っておくといいテクニック」の用法に首を傾げたので。

ちょーさん熱く語る。

なぜ株式投資はもうからないのか
保田隆明

それってPerlの一行野郎で -- それP1(ry

存在意義がわからなかったオプションの使い道を見つけたときは妙に感動する。

Y1u c1n't me 2 c3t'em r3t so h2e it g2s.

この長い名前を(最初の一文字+中間の文字数+最後の一文字)という風に略すやり方は当時のDECでは流行っていて、DECのヨーロッパのソフトウェア国際化チームがそれにならってInternationalizationをI18Nと略すようになった。

Geekなぺーじ：10のUNIX小技にperlを加えるとさらに幸せになれるというお話。

コメント欄にも書きましたが、残念ながらこの方法はIA-32限定です。

main=-277;のほうがいい気がする。

Unicodeの隠れた功績として、こうした「何て呼べばいいの?」という文字に(はんば無理矢理)名前をつけてくれたこともあります。

例えば、

「々」はなんていえばいいのだろうか？

には

々 U+3005 IDEOGRAPHIC ITERATION MARK

といった具合に。

本文の内容より、こちらが妙に懐かしかったので。

begin 755 utf8hankana-test.pl.gz

こういう「他のコマンドを組み合わせても可能な便利系コマンド」を覚えるのは、よしあしだと思う。

Unixという考えかた
Mike Gancarz / 芳尾 桂 訳
[原著: The Unix Philosophy]

最近、会社でシェルの操作方法について教えているのだが、
pgrep / pkill / skill / pidof といった
便利なプロセス操作系コマンドを知らない人が実に多い。

どうせならブラウザーにやらせましょう。

ちょろっとエンコード値を調べたい時にこういった表を用意しておくとWEB開発やチェック、入力なんかの時に便利かもしれませんね。

Sourceを貼付ける際に実体参照化するとき、みなさんはどうしていますか?

コピペのしやすさでtextareaで囲む方法に比べて一歩及ばず、そしてtagの実体参照化が必要だという欠点はあります。

私はPerlのOne-Liner、

perl -Mencoding=utf8 -MHTML::Entities -ple '$_=encode_entities($_, "<>&")'

でやっていたのですが、どうせならブラウザーを離れずに出来た方がいいですよね。というわけでこちら。

• Text -> HTML Entities Encoder

マジレスはとりあえずあとまわしにして、そんな中島さんにささやかなプレゼントを。

「誰もやったことのないこと」するのが大好きな私だが、今日は、ちょっとした実験を思いついてしまったのでぜひともご協力願いたい。

• "ユビキタス社会"を消すbookmarklet

どうせなら、もう少し潰しがきくように書いてみた。

また，明日学科のC言語のテストがある．C言語なぞ普段まったく使わないもんだから，思い出さねば．てことで，10行固定版tailを書いてみた．以下のソース．

(他に忘れられがちなもの以外|意外)に忘れられがちなのが、これ。

エンジニア以外の人間が読むと、「ページがなければ404エラー。そんなのあたりまえだろ。」で終わってしまいかねない。 ここでは、「404エラーページを見せろ」ではなく「httpヘッダーで404を返せ」と言っているのがミソだ。

そういう子はここに入れちゃうぞ;-)

• はてブ拘置所 - Bookmarklet

できた！

いつでもどこでも引き蘢りたい方は、上記のbookmarkletを登録のこと。

これだとLiberalなUTF-8ですね。

UTF-8の文字にマッチする正規表現の素直版。

That's the question.

この記事で主張しているように「同じことを2度しない（Only and Only OnceあるいはDRY：Don't Repeat Yourself）」と無条件で考えてしまうと、逆に生産性が大きく低下するケースがたくさんある。

車輪の再発明の罪滅ぼしに、こんなの作りました。

せっかく本家に載せてもらってたのに誰も見てなかったということかーｗ＞http://www.hatena.ne.jp/tool/bookmarklet#bookmark

すでに本blogの各ページには全てが付いていますが、最近人様のページに対してもそれを使いたいケースが出て来たので、手慰みにBookmarkletを作ってみました。ご自由にご利用ください。

• このページのはてブ - ポップアップ版
• このページのはてブ - 非ポップアップ版

偶然見つけたものを少しGolf。

perl使いならやはりLWP付属のこちらでしょう。

w3m -dump_head b.hatena.ne.jp

こういうやつこそ、一行野郎でしょう。

でも、今回は id:kiyohero のコードそのものが結構シンプルで直しどころがあんまりない。

組み込みを使うかWrapperを使うか、それが問題だ

やっぱり最初は localtime を素で使っちゃうよね。Perl の入門書にはおそらくほとんど localtime での例になってると思われます。しかし、僕なら Time::Piece を使う。

LLの利点の一つというのは、対話的に使えることでもある。

JavaScript のコードをインタラクティブに動かせるツール (Ruby における irb のようなもの) が欲しいと以前から思っていたのですが、今日になってようやく SpiderMonkey のインタラクティブシェルをインストールしました。

たいていのLLが対話的に利用する手段を用意しているのだが、対話型インターフェースが組み込みのPythonを除くと以外と知られていないケースも多いのでここにまとめてみた。

この人によれば、世界の全てを0と1の間に押し込む事ができるのだそうだ。この人は気がふれたというふれこみだが、実際のところは自分を数直線に押し込んだだけなのだ。

というわけで、集合論を知らなくても使える数値型言語、 Acme::Bleach::Numerically を紹介します。

タイトルどおり、Ligua::JA::NumbersをReleaseしました。CPANからまだ取れなければ

http://www.dan.co.jp/~dankogai/cpan/Lingua-JA-Numbers-0.02.tar.gz

にて入手可能です。

今日ある友人に野暮用で会った。

Perl Cookbook (English)
日本語版

彼がなぜだかPerlで2進数を扱うのに悩んでいたので回答。

最近自分がプログラマーでもあるという事を忘れつつあるので、ここらで一つ披露。

ここで、私からこんな島男スタイルを提唱する。 これをやればあなたも一見天才プログラマーだ。 結線していないキーボードをものすごい勢いで打鍵しながら
% tail -f /usr/local/apache/logs/access_log

それでは私が本当のHackerもうならせる奴を披露しよう。

ソースコードに patch あてて脆弱性対策をして復旧したのかも知れないが「コンパイル」という作業を経ずに復旧してしまう。

もちろん、コンパイル不要。

同じものと判明。。。 これは気がつかなかった。。。

という時にはこれ。

perl -MLWP::Simple -le 'print get(shift) eq get(shift)' uri1 uri2

piconv -f sjis -t utf8 foo.sjis

piconv -h

「perlをrubyやpythonのようにインタラクティブに使うにはどうしたらよいか？」という質問の答えがこれ。perldoc -q "use Perl interactively"でその原理を見る事ができる。実行すると、こんな画面になる。

Loading DB routines from perl5db.pl version 1.27
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(-e:1):   1
  DB<1> 

DB<1> p 1+2-3/4**5
2.9970703125

今日から、「一日一行野郎」-- One liner of the day -- と評して便利な One Liner (一行野郎)を紹介していこうと思う。これなら楽にエントリを積み上げて行けると思うからだ。

今回のOne Linerは、全角カタカナを半角カタカナにするもの。最近半角カタカナを(ケータイ以外で)利用する機会がめっきり減ったが、一つだけ、オンラインバンキングで受取人を入力する場合のみはあのいまいましい半角カナから逃れ得ない。なのに筆者が端末として使っているOS Xでは、半角カタカナはもう古いとばかり、非常に入力しにくい。筆者はそんな時上記のOne Linerに助けてもらう。終了するにはctrl-Dかctrl-Cだ。