tano_c

kigou.php

<?php
$__=$_[].=$_; // Array

//$__[0] => A
//$__[1] => r
//$__[3] => a
//$__[4] => y

// 0 !_ ""not string => false => [ false ] => (int) 0

//01000001 A
//01110010 r
//01100001 a
//01111001 y

//01011111 _

//01110000 p < r & y

$___ = $__[!!_] & $__[-!!_]; // これがp

//01010100 T < r ^ _ ^ y;

$____ = $__[!!_] ^ _ ^ $__[-!!_]; // これがT

// echo $__[!!_] ^ _ ; 
//01110010 
//01011111
//00101101 - 

// echo '-' ^ $__[-!!_]; // 00010000 ^ 01111001 => 
//                       01111001 10010110                 
// T 01010100 

//01010000 P <= want

echo $___ & $____;


// echo 'T' & 'p';

//var_dump(_); //string(1) "_"

//r ^ _ => -
//01110010 ^ 01011111 => 10110000
// echo 'r' ^ '_';

//01110010 
//01011111
//00101101 - 

//00101101
//01111001
//01010100 T

// t & p

//01010100
//01110000
//01010000 P


//01100101 e WANT

//$e = $p ^ $T | $A;
$$_ = $___ ^ $____ | $__[!_];

echo $$_;

//var_dump( 0 . '1'); 型キャスト存在
// var_dump(1==1);
// var_dump(1==1+""); 流石にこれは怒られるJSほどあまくない

echo $__[!!_] ;

//01101100 l 

//$l = $A ^ $r ^ _;
$$__ = $__[!_] ^ $__[!!_] ^ _ ; 

echo $$__;

// $a = 'a';
// echo ++$a ; // b
// つまりBFっぽく文字を作り出していくことも可能
// +いっぱいコーディング.... 


?>

perl.php

<?php
$__=$_[].=$_; 
$___ = $__[!!_] & $__[-!!_]; 
$____ = $__[!!_] ^ _ ^ $__[-!!_]; 
$$$___.=$___ & $____;
$$_ = $___ ^ $____ | $__[!_];
$$$___ .= $$_;
$$$___ .= $__[!!_] ;
$$__ = $__[!_] ^ $__[!!_] ^ _ ; 
$$$___ .= $$__;

echo $$$___ ;

?>