Polyglot ってどう書くの

基本はコメントや文字列リテラルで各言語を「脱落」させていく

 # coding: euc-jp
 q=(       # Perl 脱落
 """"      # Python 脱落
 puts "Ruby!"
 '         # Ruby 脱落
 """)      # Python 復帰
 print "Python!"
 """       # Python 脱落
 =;        # Perl 復帰
 print "Perl!\n"
 #"""#')   # 調整