작업은 문자열을 입력으로 사용하고 다음 규칙을 만족하는 모든 줄의 시작 부분에 텍스트를 추가하는 프로그램 (또는 함수)을 작성하는 것입니다.

• 추가 된 텍스트는 줄 번호를 포함해야합니다. 0 또는 1 기반 색인을 사용할 수 있습니다.
• 텍스트는 해당 언어의 주석이어야합니다. 주석은 프로그램 상태를 변경하지 않는 구문 상 유효한 코드 조각으로 정의됩니다. 주석을 제거해도 프로그램이 변경되지 않아야합니다.
• 주석은 끝에 줄 바꿈 만 포함 할 수 있습니다.
• 공백과 주석 만 포함 된 줄에 줄 번호를 넣을 필요는 없습니다.

명세서

• 입력 한 언어가 유효한 프로그램이라고 가정 할 수 있습니다.
• 파이썬과 같이 들여 쓰기에 민감한 언어에서는 모든 들여 쓰기 뒤에 줄 번호 주석을 넣을 수 있습니다. 들여 쓰기 문자로 탭이나 공백을 선택할 수 있지만 게시물에 지정해야합니다.
• 코드의 모든 문장이 최대 한 줄을 차지한다고 가정 할 수 있습니다. 즉, 여러 줄 문자열이나 백 슬래시 연속이 없습니다.

테스트 사례

파이썬 :

#0
a = int(input())
#1
while a:
    #2
    print(a)

C : (정직하게,이 컴파일에 놀랐습니다)

/*0 */#include <stdio.h>
/*1 */int main()
/*2 */{
/*3 */    char c;
/*4 */    c = getchar();
/*5 */    do
/*6 */    {
/*7 */        putchar(c);
/*8 */    }
/*9 */    while (c);
/*10*/}

이것은 code-golf 이므로 가장 짧은 답변 (바이트)이 이깁니다.

파이크, 7 바이트

o\Kz++r

여기 사용해보십시오!

o       -  o++
 \K     -  "K"
   z    -  input()
    ++  - sum(^)
      r - while no errors: GOTO start

정수 주석을 정수 다음에 문자 K와 줄로 선언 합니다. 추가 바이트는 개행 opcode가 시작되어 추가 항목을 인쇄하지 못하게하는 데 사용됩니다.

펄, 8 + 1 = 9 바이트

say"#$."

-p(1 바이트 페널티)로 실행하십시오 . (PPCG 규칙에 익숙하지 않은 사람들에게 참고하십시오. 또한을 사용하여 최신 버전의 Perl 구문을 지정해야 -M5.010하지만 언어 버전을 선택하는 옵션은 무료이며 바이트 페널티는 발생하지 않기로 결정했습니다. 이 게시물의 원본 버전)

-p프로그램을 암시 적 루프에 배치합니다. 기본적으로 프로그램이 각 행을 개별적으로 처리하는 필터가됩니다 (즉, 전체 프로그램이 첫 번째 행, 두 번째, 세 번째 등에서 실행 됨). Perl은 또한 $.몇 줄의 입력을 읽었는지 기록하는 행 번호를 추적 합니다. 프로그램의 모든 작업은 -p입력 라인을 읽도록하는 것입니다. a #, 현재 줄 번호 ( $.) 및 줄 바꿈을 출력합니다 ( say기본적으로 줄 바꿈을 추가합니다.이 경우에 도움이되며 더 일반적으로 보이는 것보다 짧습니다 print). 그런 다음 -p읽은 원래 코드 줄 (일반적으로-p입력에 대해 일종의 처리를 수행하지만 우리가하지 않았기 때문에 출력이 변경되지 않았습니다). Perl의 주석은 #개행 문자로 실행됩니다 ( #프로그램 자체는 문자열 리터럴 안에 있기 때문에 주석을 시작하지 않습니다). 기본적으로 수행하는 작업은 처리 할 때 주석 행을 파일에 쓸 수있는 기회를 얻는 것입니다 의 "자연적인"읽기 및 쓰기주기를 방해하지 않습니다 -p.

자바 스크립트, 43 39 바이트

a=>a.replace(/^/gm,_=>`/*${++b}*/`,b=0)

4 바이트를 절약 해 준 ETH와 Conor에게 감사합니다.

V , 10 바이트

O:1òYjjP

온라인으로 사용해보십시오!

배치, 91 바이트

@set n=
@for /f "delims= tokens=*" %%a in (%1) do @set/an+=1&call echo @rem %%n%%&echo %%a

배치는 EOF까지 STDIN을 읽는 방법이 없으므로 대신 파일 이름을 명령 행 매개 변수로 전달해야합니다.

루아, 80 75 바이트

언어를 남용하여 바이트를 절약했습니다.

x=1print("--[[1]]"..(...):gsub("\n",load('x=x+1return"\\n--[["..x.."]]"')))

충분히 간단한 스타터 답변.

언 골프, +

x=1                                                     -- Assign x to 1...
print(                                                  -- Print...
      "--[[1]]"                                         -- The first line number comment...
      ..                                                -- With...
      (...):gsub(                                       -- The input, replacing all...
                 "\n",                                  -- Newlines...
                    load                                -- with a string compiled function...
                    (' \
                    x=x+1                               --Increment x by one... \
                    return"\\n--[["..x.."]]"            -- And return the new linecomment. \
                    ')
                 )
      )

Gema, 16 15 자

*\n=\!@line\n$0

Gema에는로 시작하는 줄 설명 만 있습니다 !.

샘플 실행 :

bash-4.3$ cat l33t.gema 
e=3
g=9
i=1
o=0
t=7

bash-4.3$ gema -f l33t.gema <<< 'Hello World!'
H3ll0 W0rld!

bash-4.3$ gema '*\n=\!@line\n$0' < l33t.gema > l33t-nr.gema

bash-4.3$ cat l33t-nr.gema
!1
e=3
!2
g=9
!3
i=1
!4
o=0
!5
t=7

bash-4.3$ gema -f l33t-nr.gema <<< 'Hello World!'
H3ll0 W0rld!

다음은 무시 된 코드의 종류로 줄 번호를 추가 할 수 있는지 여부 에 대한 Adám 의 질문 에 대답 합니다.

Gema 코드는 기본적으로 from = to 변형 규칙 또는 Gema 용어의 템플릿 = 작업 모음입니다 . 절대로 절대로 일치하지 않는 템플릿 을 정의 할 방법이 없습니다.이 방법으로 는 보이지 않습니다.

Gema, 18 자

*\n=c:\=@line\;:$0

로 변환 e=3됩니다 c:=1;:e=3.

다행히 Gema에는 네임 스페이스의 일종 인 도메인 이 있습니다. 위의 코드는 우리가 절대 사용하지 않는 네임 스페이스 c의 더미 규칙을 정의합니다. 불행히도 언급 된 도메인은 줄이 끝날 때까지 유효하므로 기본 도메인으로 명시 적으로 전환해야합니다.

Gema, 18 자

*\n=@line\=\$0\;$0

로 변환 e=3됩니다 1=$0;e=3.

덜 복잡한 대안은 무시되는 코드 대신 효과가없는 코드를 사용하는 것입니다. 나는 정확히 일치하는 것을 되돌려 놓아야합니다.

Qbasic, 91 89 바이트

OPEN"I",1,"i"
OPEN"O",2,"o"
DO UNTIL EOF(1)
i=i+1
INPUT#1,a$
PRINT#2,STR$(i)+"'"+a$
LOOP

입력:

CLS
PRINT "Hello!"
a$="Welcome"
INPUT "Type your name: ", b$
PRINT a$; ", "; b$
END

산출:

 1'CLS
 2'PRINT "Hello!"
 3'a$="Welcome"
 4'INPUT "Type your name: ", b$
 5'PRINT a$; ", "; b$
 6'END

BASH (+ GNU sed) 27 바이트

sed 'i#
='|sed 'N;s/\n//;N'

첫 번째 부분 ( i# \n =)은 GNU sed (4 바이트)에서 거의 작동하지만, 뒤에 개행 문자를 넣습니다 #.

awk ( 19 13 바이트)

19 바이트 : 코드의 각 줄 위에 "#"+ 줄 번호를 삽입합니다.

{print"#"NR"\n"$0}

13 바이트 : 두 개의 13 바이트 솔루션에 대한 @manatwork 덕분에 신용 및 감사

으로 1하는 액션 기본값 print $0:

{print"#"NR}1

또는 $0내용 을 교체하여

$0="#"NR RS$0

코 틀린 확장 기능, 69 60 바이트

fun String.a()=lines().mapIndexed{i,s->"/*$i*/$s"}.joinToString("\n")

fun String.a(){lines().mapIndexed{i,s->println("/*$i*/$s")}}

사용법 예 :

fun main(args: Array<String>) {
  //language=kotlin
  val code = """fun main(args: Array<String>) {
  println("Hello world!")
}"""
  code.a()
}

산출:

/*0*/fun main(args: Array<String>) {
/*1*/  println("Hello world!")
/*2*/}

CJam, 21 바이트

나는 CJam에 정통하지는 않지만 의견이 있다는 사실을 알고있었습니다. :)

qN%ee{"e#"o(oNo(oNo}/

곧 설명하겠습니다.

Mathematica, 58 바이트

i = 1; StringReplace[#, StartOfLine :> "(*" <> ToString@i++ <> "*)"] &

jq, 31 자

(27 자 코드 + 4 자 명령 행 옵션)

"#\(input_line_number)\n"+.

jq에는로 시작하는 줄 설명 만 있습니다 #.

샘플 실행 :

bash-4.3$ cat l33t.jq 
gsub("e";"3")|
gsub("g";"9")|
gsub("i";"1")|
gsub("o";"0")|
gsub("t";"7")

bash-4.3$ jq -Rr -f l33t.jq <<< 'Hello World!'
H3ll0 W0rld!

bash-4.3$ jq -Rr '"#\(input_line_number)\n"+.' l33t.jq > l33t-nr.jq

bash-4.3$ cat l33t-nr.jq 
#1
gsub("e";"3")|
#2
gsub("g";"9")|
#3
gsub("i";"1")|
#4
gsub("o";"0")|
#5
gsub("t";"7")

bash-4.3$ jq -Rr -f l33t-nr.jq <<< 'Hello World!'
H3ll0 W0rld!

GolfScript, 23 바이트

n/0:i;{"#"i):i+n+\+}%n*

"#"으로 시작하는 줄 설명 만 있습니다.

언 골프 드 & 설명 :

           # the input is pushed on the stack automatically
n          # n is a predefined variable for "\n"
/          # splits the input string with the previously pushed "\n" as delimiter
0:i;       # i = 0
{          # A code block: It is used for map here (going through the input)
    "#"    # push a "#" onto the stack
    i):i  # save i + 1 in i, the value is again not popped from the stack
    +      # implicitly converts the number i to a string and concatenates "#" with it
    n      # newline
    +      # add a newline (# introduces a *line* comment)
    \      # switch the top to elements (-> yields the comment as the bottom, and the line as the top element on the stack)
    +      # concatenate them
}          # end of the code block
%          # map
n          # newline
*          # join the list with newlines between them
           # outputs are done implicitly

나는 이것이 더 단순화 될 수 있다고 확신합니다. 특히 i아마도 생략 될 수 있습니다.

https://golfscript.apphb.com/ 여기에서 테스트 할 수 있습니다. 이 사이트는 입력 추가를 지원하지 않으므로 코드 앞에 큰 따옴표로 묶은 문자열을 넣어야합니다. '\n'줄 바꿈이 될 것입니다. 다른 이스케이프 시퀀스도 있다는 사실을 알고 있어야합니다. '\\'확실하지 않은 경우 사용자 .

C # 6, 66 61 바이트

CSharpie 덕분에

(666, 악마 코드 ^^) 더 이상은 ...

"C 스타일 주석"(C, C ++, C #, Java 등)을 사용하는 모든 언어에서 작동합니다.

단순히 문자열을 줄로 나누고 모든 줄 앞에 색인을 추가하고 편집 된 줄을 새로운 줄 문자로 다시 결합합니다.

s=>string.Join("\n",s.Split('\n').Select((l,i)=>$"/*{i}*/"+l));

구 버전:

s=>string.Join("\n",s.Split('\n').Select((l,i)=>$"/*{i,3}*/{l}"));

파이썬 2, 82 바이트

공간 전용 들여 쓰기에 사용

for i,l in enumerate(input().split('\n')):print l.split(l.lstrip())[0]+'#%d\n'%i+l

56 바이트의 들여 쓰기가없는 버전

for x in enumerate(input().split('\n')):print'#%d\n%s'%x