Создайте только название языка программирования, используя только возможности самого языка. Имя языка может быть вызвано только косвенно, то есть из нестандартных переменных среды, встроенных функций или методов или интерпретатора / компилятора языка. Выходными данными должно быть только название языка.

Одним из примеров будет:

$ awk --v | awk 'NR<2 { print $2}'  # GNU Awk 3.1.8
Awk

Ответ, который я выберу, будет с наибольшим количеством голосов. В случае ничьей, самый короткий вариант игры в гольф (отдельный или единственный ответ) будет прерывателем связи.

БАШ, 17 7

bash -c 'echo $0'

или даже

echo ${0#-}

если ты уже запускаешь bash: D

обновление : "echo $0"получает $0расширено первым , так 'echo $0'это правильный ответ.

Пробелы

|  	 	 			
	
    		 	   
	
    		 	  	
	
    			 	  
	
    		  	 	
	
    			  		
	
    			    
	
    		    	
	
    		   		
	
    		  	 	
	


|

С

#define d(x) x(#x[3])
void main(){d(putchar);}

Python - 23 22

print`credits`[97:103]

J, 4

u:74

Краткое название языка помогает.

Python (win32) - злоупотребление случайным модулем

Я не уверен, работает ли это на самом деле . Зависит от реализации.

print ''.join([(random.seed(835)==None)and'']+[chr(random.randint(64,90)) for x in range(3)]+[(random.seed(53281)==None)and'']+[chr(random.randint(64,90)) for x in range(3)])

Brainfuck

Просто для забавы (я знаю, это не связано с целью задачи.), Я написал этот код ...

+++++[><-+-+-><><>++<><>+++++<>+<]>>>+
+>><<+<>+><<>+[><-<<+>>><>+<><>++<]>[-<<<
+>>>]+<<+<[><->>+>><>+<<><+<<]>->-><>->
+++++<<>+++++<<>------>><>+.<<[-<>+<>->
+<]>>+><+<>><+><+[<]>-<><>-><<>-<<>+>-.<
+<><>+<>+[><>-<>-><<>-<>><-<><>-><><-+<
++---]>[+>]<<+><+.>><-<<+++++[>+<><><-]
>
+++.>+<+<>+++<>+.+>
-.<><+<+><+><><++>
+++<>+<+>>+<><>+<
+.<><+[->>+>><<++
+<>><++-<<-+-<>+]+
>
>
---.<
---
---
---
<>>
<-.
---
>-<

И когда я заменил <, >, [, ], .с пространством ...

+++++   -+-+-     ++    +++++  +     +
+    +  +    +   -  +     +    ++    -   
+    +  +    -  +    +    +    - -   - 
+++++   +++++   ------    +    -  +  - 
+    +  +    +  +    -    -    -   + -  
+    +  +    -  -    -    -    -    -+ 
++---   +    +  +    -  +++++  +     - 

+++  + +  +++  + + 
-    + +  +    ++ 
+++  + +  +    + 
+    + -  +    ++
+    ++-  -+-  + +


---  
---
---
---

 - 
---
 - 

Пайет, 47x2 пикселей

Используя 5x5 кодов:

питон

import sys;print sys.copyright[24:30]

Это также работает для меня (sys.executable это '/ usr / bin / python')

import sys;print sys.executable[9:]

Brainfuck 101

++++++++[->++++++++++++>+>>++>+++<<<<<]>[->+>+>+>+<<<<]>+>++.>++.<-.<.>>----.<<---.>>>---.<<++.>---.

вероятно, можно было бы поиграть немного дальше, но сейчас 6 утра, и мне нужно немного поспать ...

С

В духе ответа Анона на C (учитывая, что файл C всегда имеет расширение .c). Я бы предложил:

#include <stdio.h>
void main(){puts(__FILE__+sizeof(__FILE__)-2);}

Джава

public class Name {
    public static void main(String[] args) {
        String s = "";
        s = s.getClass().getName();
        s = s.substring(0, 1).toUpperCase() + s.substring(1, 4);
        System.out.println(s);
    }
}

С

Построен с использованием DevStudio 2005

#include <stdio.h>
void main ()
{
  int i,j,i2;
  for (i=j=0,i2=200;i2<=200;i2-=19,j==putchar(32|(i2<'Q'&&i2>'+'&&(j<20||i<12||i>28))*3)+8?j=0,i2+=i,i+=putchar('\n')-8:(i2+=j,j+=2));
}

Немного более короткая версия (с предупреждениями компилятора)

int i,j,k;
for (i=j=k=0;k<=0;k-=19,j==putchar(32|(k<-119&&k>-157&&j<20|i<12|i>28)*3)+8?j=0,k+=i,i+=putchar('\n')-8:(k+=j,j+=2));

Рубин - 27

puts RUBY_DESCRIPTION[0..3]

Обновление от комментария Криса Джестера-Янга:

Рубин - 24

puts RUBY_COPYRIGHT[0,4]

Обновлено из Хаулета:

Рубин - 15

p`ruby -v`[0,4]

кот 3

Создайте файл со следующим содержанием (исходный код)

cat

И запустить его как (выполнить файл):

$ cat filename

Clojure - 16 символов

(subs(str =)0 7)

Хаскелл, 47

data H=Haskell deriving Show
main=print Haskell

Рубин

Не коротко, но очень косвенно.

4.times{|x|print((82+11.24*x+8.231*Math.tan(111.2*x)).floor.chr)}

Рубин (17)

p 1299022.to_s 36

Выходы "ruby"

Bash / Brainfuck / C

//bin/bash -c 'echo ${0##*/}'
#define p putchar
#define exit main(){p(p+67);p(10);}
exit
//++++++++[->++++++++++++>+>>++>+++<<<<<]>[->+>+>+>+<<<<]
//>+>++.>++.<-.<.>>----.<<---.>>>---.<<++.>---.

Brainfuck

>++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++.
++++++++++++++++++++++++++++++++++++++++++++++++.
-----------------.
++++++++.
+++++.
--------.
+++++++++++++++.
------------------.
++++++++.

Perl

$^X=~/([a-z]+)[^\/]+$/;print$1,$/

Скала - 42

print(((1,1).getClass+"").substring(6,11))

Обновление - 39 символов

print(('a.getClass+"").substring(6,11))

С - 34

У меня недостаточно репутации, чтобы добавить это как комментарий к предыдущей записи C. Та же идея, что и выше, но имя файла может быть любым.

main(){puts(index(__FILE__,0)-1);}

> <> (Рыба) (11)

Даже лучше:

'>'::o2-oo;

Visual Basic (версия 6.0)

MsgBox Right(Error(458), 12)

VBScript

On Error Resume Next
Err.Raise 458
MsgBox Right(Err.Description, 8)

И VB6, и VBScript

On Error Resume Next
Err.Raise 458
D = Err.Description
MsgBox Mid(D, InStr(2, D, "V"))

QBasic (37)

Я использую версию 1.1 интерпретатора QBasic.

FOR x=0TO 5:?CHR$(PEEK(2588+x));:NEXT

Луа 25 символов

print(arg[-1]:match"%w+")

Или, аналог J решения JB 17 символов:

print"\76\117\97"

GolfScript (13)

"#{$0[0..9]}"

Ракетка (45)

racket -e "(display(substring(banner)10 17))"