Self Reference - 兼雑記

を見て、なんか書いてみるかなぁと。下記3つのコードは一定の期間をおいて SEGV するコードなのですが、共通のテーマに基づいて書かれてます。 SEGV の理由は何でしょうか。

一個目。邪道。でもゴルフでたまに使えるんだよね。

''=~('(?{'.('_/_
'^';@{:').'})')

二個目。一番短いけどこの挙動は長い間知らなかったので結構わからん人多いんじゃないかな。

$_=~'(?{$_=~""})'

三個目。読むのはそんなに難しくないけど、書くのは結構大変。新しく書こうと思ったけど結局使い回しでいいやという。

($;=<<''
_(_@{**+(\$;=<<''
$;
)=~('
_ ^-^,'^'"`[;[?@(\$;^":^>,[[[")})')+

)=~('
_ ^-^,'^'"`[;[?@($;^":^>,[[[")})')