PHPとしても実行できるRubyの書きかた ref: http://qiita.com/supermomonga/items/79d599b4ed8b385870b0

file1.txt

p <<PHP_VERSION
<?php
PHP_VERSION
;print "\033[1F\033[1M";

file2.txt

print "\033[1F\033[1M";

file3.txt

print "\033[1F\033[1M";

file4.txt

//.tap{ define_method :range, -> s,e { s.upto e } }
//.tap{ define_method :array_map, -> f,seq { seq.map{ |x| f.(x) } } }
//.tap{ define_method :function, -> x,&b { -> x { $x=x;b.call } } }

file5.txt

//.tap{ ... }

file6.txt

//; ...

file7.txt

array_map(function($x){
  print $x % 15 == 0 ? 'FizzBuzz' : ($x % 3 == 0 ? 'Fizz' : ($x % 5 == 0 ? 'Buzz' : $x));
  print "\n";
}, range(1,100));

file8.txt

p <<'PHP_VERSION;'

file9.txt

p <<'PHP_VERSION;'
<?php
PHP_VERSION;
print "\033[1F\033[1M";

PHP

p <<PHP_VERSION
<?php
PHP_VERSION
;print "\033[1F\033[1M";

php.rb

p <<PHP_VERSION
<?php
PHP_VERSION
;print "\033[1F\033[1M";
//.tap{ define_method :range, -> s,e { s.upto e } }
//.tap{ define_method :array_map, -> f,seq { seq.map{ |x| f.(x) } } }
//.tap{ define_method :function, -> x,&b { -> x { $x=x;b.call } } }
array_map(function($x){
  print $x % 15 == 0 ? 'FizzBuzz' : ($x % 3 == 0 ? 'Fizz' : ($x % 5 == 0 ? 'Buzz' : $x));
  print "\n";
}, range(1,100));

Ruby

p <<PHP_VERSION
<?php
PHP_VERSION
;print "\033[1F\033[1M";