wiki:Dev/Perl/HENTAI

  • Perlの不思議な現象を B::Deparse で調査/楽
    #!/usr/bin/perl
    use strict;
    use warnings;
    
    0->[0] = 100;
    print 0->[0];
    
    • ちなみに、0 → 1 にしても同様に動く。$1 は特殊変数としては読み取り専用なのに、リファレンスにすると読み書きできるっぽい。

deploy

  • コードを全く書かずにcatと同じことをする
    $ perl -pe 0
    

Regular Expression

Last modified 5 years ago Last modified on Oct 23, 2012 6:46:14 PM