Ежегодно проводимая конференция BlackHat является одним из самых значимых событий в сфере информационной безопасности. В этом году эксперты из множества стран собрались в Лас Вегасе, чтобы показать и обсудить результаты своих исследований. Разумеется, не обошли стороной веб-безопасность – наиболее интересное выступление дали Эдуардо Вела (Eduardo Vela) и Дэвид Линдсэй (David Lindsay) на тему реали
http://d.hatena.ne.jp/TAKESAKO/20090716/1247750262 via http://d.hatena.ne.jp/sugyan/20090717/1247842750 を見て、なんか書いてみるかなぁと。下記3つのコードは一定の期間をおいて SEGV するコードなのですが、共通のテーマに基づいて書かれてます。 SEGV の理由は何でしょうか。 一個目。邪道。でもゴルフでたまに使えるんだよね。 ''=~('(?{'.('_/_ '^';@{:').'})')二個目。一番短いけどこの挙動は長い間知らなかったので結構わからん人多いんじゃないかな。 $_=~'(?{$_=~""})'三個目。読むのはそんなに難しくないけど、書くのは結構大変。新しく書こうと思ったけど結局使い回しでいいやという。 ($;=<<'' _(_@{**+(\$;=<<'' $; )=~(
rrencode は指定された文字列を出力するプログラムを記号だけで合成するプログラム、ですが、Ruby 1.9 では ?. とかが文字列を返すようになってしまったので動きません。 そこで 1.9 用に別の実装を作ってみました。Hello, world! はこちら。 _=[*' '..?~]*'';$><<_[(___=_=~/@/).+_=~/\(/]+_[(__=_=~/_/).+_=~/&/]+_[ __+@@_=_=~/\-/]+_[__+@@_]+_[(@_=_=~/~/)-@@_=_=~/\//]+", "+_[@_.-_=~/'/ ]+_[@_-@@_]+_[@_.-_=~/,/]+_[__.+_=~/\-/]+_[__.+_=~/%/]+?!+$/$ ./ruby _=[*' '..?~]*'';$><<_[(___=_=~/@/).+_=~/\(/]+_[(__=_=~/
Perlで記号プログラミング - TAKESAKOのはてな出張所 に対しての挑戦が。 id:TAKESAKO に挑戦してみる - yujiorama の日記 面白そうなので自分もやってみる。 #!/usr/bin/perl $^='-^\\\\%+"<&]\\$=/**:.](%_,//;<#)\\^_%$=]."\\&=\'?/:$?({/!_})(([=##!-^/\'%_#"]{"?~<]$\':$;#"&]`<#:?', $^_='_~`||`]@^_`"./,))<%?%<"(?<_}+^.;#^^@@{`:,|[{_``__[]_;/@-<~<;^.[^~::<&""[_`}*.[?]+[?!|-_`@[*);//(]?",=_+?]{{#`,@@<*@[{|/`.@#@[""[+_}[?__(?.+[_}<.?_"{>|!{}@@^_,{<', $^_^='{>][[[;/,
2009年07月10日に開催された The JUI 2009 Returns (JavaScript User Interface) : ATND に行ってきました。 遊びがてら、ちょうど jQuery UI を使い始めたところだったので、今後の方向性についても非常に勉強になりました。みなさんのLTも、あまり自分からは積極的に勉強してない分野の話題が多かったので、とても勉強になりました。 私の発表したLTのプレゼン資料をあげておきます。 http://utf-8.jp/public/20090710/jjencode.pps 当日のUstream中継の動画もこのあたりにあるようです。 JUI 03-04 Hasegawa and Takesako, The JUI 2009 Returns (JavaScript User Interface) http://atnd.org/events
ここからが本題です。 Perl は頭がおかしいです。すごすぎる。この感動を伝えたいと思います。まず Perl の基本からです。 Hello world! を書きましょう。 ''=~('(?{'.('[[).[|`%,,/`[/[@$'^'+)@@/^(@@@@@,@),@').'! "})')えーと。このくらいわかりますよね。これは Hello world という一番簡単なプログラムなのでわからない人はちょっとプログラムの才能が無いです。嘘ですが。 Perl では記号だけでは出力もできないかな、というような話をしていたところ、 Acme::EyeDrops の出力は記号だけで出力してるぞ、ということでした。これは見たことがあったのですが、確かに今見ると記号だけです。で、これの出力の意味を理解してたんですが、なんともすごいものでした。書いてから後で Perl ヤロウどものことだから既に常識だ
何かの拍子にこの記事を見かけてしまい、衝撃を受けた。 2006-11-07 - 兼雑記 Perlってこんな変態プログラムが書けてしまうのか…！！と。 記号だけでプログラムが書けてしまうとは全然知らなかった。 何度も読み返してようやく理解した範囲では、 拡張正規表現の構文を利用して任意のコードを実行させる 文字列は文字列同士の排他的論理和をとることで生成できる ということらしい。 なので、「どの文字とどの文字の排他的論理和がどの文字になるか」を把握していれば、そこから文字列を生成することができるわけで、自分でもこうした記号プログラムが書けるのではないか？と思って、作ってみた。 任意のワンライナーを記号で表現しなおすためのスクリプト。(2/8 ちょっと修正) #!/usr/bin/perl use strict; use warnings; # 変換辞書 my $dict = &create_
http://shinh.skr.jp/m/?date=20080823#p01 >RubyコードをRubyで等価に実行可能な記号だけに変換する プログラムは書けるだろうか。 eval"実行したいコード" を記号だけで表現すればいんじゃね？ と適当に変換プログラム書いてみた。 def _(_) r="''<<"+_.split("").map{|_| _=_.ord; return "~-_" if _==0 (["_"]*(_&3)+["__"]*(_>>2&3)+["___"]*(_>>4&3)+["____"]*(_>>6&3))*"+" }*"<<" "->{_=-~($$-$$);__=_<<_+_;___=_<<__;____=__<<__;%s}[]"%r end puts"->&_{_}[&:\"\#{#{_"method"}}\"][$$,:\"\#{#{_"eval"}
このコード を見ていて書けることに気付いた。 puts <<END class String alias originalinspect inspect def inspect alias inspect originalinspect #{s='';$<.read.each_byte{|v|s+="concat #{v}\n"};s} eval self exit 0 end end p String nil END 数字もまぁなんか消せると思う。これで Ruby も Perl 並と言っていいか。 See also. 任意の Ruby (1.9) プログラムを記号だけにするプログラム ppencode (eval つけられれば今回のと同じことできるけど、 Perl って文字列の連結できるかな) Acme::EyeDrops (任意の Perl プログラムを記号だけにするプログラム) 追記
かなり古い話題かもしれませんが，ppencode の動作原理が分かったのでその感動を日記に記します。 僕は半年前ほど前からperlの勉強を始めましたが，始めてまだ間もない頃にppencodeを知って，これが何故動くのかが当時は全然分かりませんでした。 ppencodeって何？って方は下記URLを参照すると，分かります。’予約語プログラミング’なんてキーワードでググってみても関連情報が出てきます。 TAKESAKOさんのサイトでppencodeのデモが見れる http://www.namazu.org/~takesako/ppencode/demo.html id:naoyaさんのブログエントリ http://d.hatena.ne.jp/naoya/20050901/1125556355 上述したTAKESAKOさんのデモページで'test'の文字列を入れるとですね・・下記のようなppen
Perl で記号だけ (ASCII が 32-126 で ~/\W/ なものと改行のみ) で Quine を書く努力をしていました。なんか最初は 300Byte 近くだったんだけどゴルフしてるうちに 103Byte まで。 ($;=<<'' #&-!!*!%>{(\$;=<<'' $; )=~(' _ ^-^,'^'"`[;[?@(\$;^\$^)})')+ )=~(' _ ^-^,'^'"`[;[?@($;^$^)})') なんか色々やってるうちに Ruby の最短 に似てきたのでした。 追記: せっかくなので顔文字を埋めてみた。顔文字埋めてる場合じゃなくてまだ縮んだ。 何やってるかっていうとなんか ;''=~ から先が要は eval($;^$^) というコードを実行していて、 $;^$^ は xxxa+print"\$;=<<'_' ..." とかいう感じの自分自身を吐き出すコードにな
これ、くだらなすぎて吹きましたｗｗｗｗｗ <a href="http://www.nicovideo.jp/watch/sm1024453">【ニコニコ動画】Perlで予約語プログラミング</a> ppencodeのデモはこちら。 http://www.namazu.org/~takesako/ppencode/demo.html 僕らの世代からするとメンテナンスタスクを書く程度にしか使わない印象のスクリプトですが、今の若い連中は自分のHPやブログを実装するのに最初に覚える言語がインタプリタなスクリプト言語だっため、それがすべてだと思い込んでいる人が多いんでしょうねー。文型でおれはプログラマーだ！といいはる若いやつらはだいたいがこの人種です さらにここ何年もWebフロント系のプログラマーの需要が高く（学生がバイトで年収１０００万なんて大げさな話ではないみたい）、さらに勘違いを助長するハメに
2007年9月7日（金）東京ドームホテルB1Fで開催された「ITpro Challenge!」に行ってきました。 先着70名までという超プレミアムなイベントでしたが、ライトニング・トークスでの発表の機会をいただき、私も参加することができました。 東京を直撃した台風により多摩川がバッファオーバーフローしていたにもかかわらず、会場は満席で大盛況でした。 私がApacheモジュールを書く理由「wafful.org」 LTの発表に使用したスライドのサムネイルを一部公開します。 発表内容を全部録画したデータは後日公開されると思いますので、時間の関係で今回詳しく話せなかったこととして、 Apacheのフィルタモジュールを書くときに参考にした情報について補足しておきたいと思います。 Apache2から用意されたライブラリ APR (Apache Portable Runtime) そのもののチュートリア
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
