読者になる

他人の脳内

この広告は、90日以上更新していないブログに表示しています。

2005-10-19

Perlゴルフ大好き

programming

もう解答編が出てしまったが、結城浩さん出題の「ランダム・アルバイト・クイズ」への答案。

perl -ne'$r[$.<=5?$.:1+rand$.]=$_;END{map print,@r[1..5]}' <応募者が1行ずつ並んでいるファイル>

以前たほいやの嘘をシャッフルするのに使ったone linerと原理は似ている。

another 2005-10-19 22:51

この記事をはてなブックマークに追加
Tweet
広告を非表示にする
  • もっと読む
コメントを書く
« ■ 自分は「するべき」という考え方が好きす… »
プロフィール
id:another id:another

はてなダイアリーの廃止に伴い、2019年3月2日に http://d.hatena.ne.jp/another/ から移行しました。再開の予定はありません。

読者です 読者をやめる 読者になる 読者になる
このブログについて
検索
リンク
  • はてなブログ
  • ブログをはじめる
  • 週刊はてなブログ
  • はてなブログPro
最新記事
  • リアルがおろそか
  • 用心の例
  • 失敗と二次的な失敗
  • ここ1-2年ではっきりしてしまったこと
  • 続・年度初めから凹む
月別アーカイブ

はてなブログをはじめよう!

anotherさんは、はてなブログを使っています。あなたもはてなブログをはじめてみませんか?

はてなブログをはじめる(無料)
はてなブログとは
他人の脳内 他人の脳内

Powered by Hatena Blog | ブログを報告する

引用をストックしました

引用するにはまずログインしてください

引用をストックできませんでした。再度お試しください

限定公開記事のため引用できません。

読者です 読者をやめる 読者になる 読者になる