趣味程式：列印自己代碼的程式

在CSDN上看到了這道題http://community.csdn.net/Expert/topic/4654/4654528.xml
是寫一小段程式，列印自己的代碼。按我的理解，這裡應當不能利用中繼資料或者檔案操作，要完全使用程式碼產生一段和自己的代碼一模一樣的字串。我寫了幾個版本，這些程式運行出來的結果都是列印所貼代碼本身，大家可以試試看，娛樂一下，僅此而已。

C#版，為簡化字串操作，該程式只有一行。class P{static void Main(){string s="class P{{static void Main(){{string s={1}{0}{1};System.Console.WriteLine(s,s,(char)34);}}}}";System.Console.WriteLine(s,s,(char)34);}}

我已經寫不出比這個還短，同時能列印自己代碼的C#程式了。

VB版Module M:Dim c$ = "Module M:Dim c$ = {2}{0}{2}{1}Sub Main(){1}Console.WriteLine(c,c,vbCrLf,Chr(34)){1}End Sub:End Module"
Sub Main()
Console.WriteLine(c,c,vbCrLf,Chr(34))
End Sub:End Module

同樣，為了簡化字串操作，壓縮了空格和換行。這也是我能寫出最短的VB版本。

Python版print (lambda s: s.replace(chr(042),chr(047))%s)('print (lambda s: s.replace(chr(042), chr(047))%%s)("%s")')

我的Python用的不是十分熟練，因此這個Python版本恐怕還不是最短的版本。不知道在座Python高手們能不能寫出更精妙的列印自己代碼的程式。