이 도전은 매우 간단합니다. 입력으로 정규식을 사용합니다.

그런 다음 소스 코드가 정규식과 일치하는지 여부에 대한 진실 / 거짓을 출력합니다. 그렇게 간단합니다! 두 가지만 더 :

• quine 내장 없음; 그러나 파일 IO 등으로 코드의 소스 코드에 액세스 할 수 있습니다.
• 이것은 code-golf 이므로 바이트 단위의 가장 짧은 코드가 이깁니다!

예

소스 코드는 말이었다 경우 abc의 입력은 a\wc진정한 반환과의 입력은 a\dcfalse를 반환합니다.

Z 쉘, 12 바이트

grep "$@"<$0

Zsh 조건은 종료 코드 만 이해하며 스크립트는 0 또는 1로 종료됩니다.

또한, 검색이 인쇄되지 않은 빈 문자열 (소스 코드)와 함께 조합하여 truthy / falsy 값으로 될 수있는 불일치의 빈 하나 test/ [.

프로그램은 자체 파일을 읽지 만 OP의 주석 에 따르면 허용됩니다.

자바 스크립트 (ES6), 39

(f=_=>!!`(f=${f})()`.match(prompt()))()

파이썬 3, 119 바이트

이것은 더 차갑게 보입니다 .IMO (그리고 파일을 읽지 않습니다).

(lambda i:print(bool(__import__('re').search(input(),i))))("(lambda i:print(bool(__import__('re').search(input(),i))))")

파이썬 3, 67 바이트

print(bool(__import__('re').search(input(),open(__file__).read())))

이 의견 을 읽은 후 추가되었습니다 .

줄리아, 64 54 바이트

r=readline;show(ismatch(Regex(r()),open(r,@__FILE__)))

Julia 정규식은 PCRE를 사용합니다. 파일의 소스 코드를 읽는 것이 quines의 표준 허점이지만,이 경우 명시 적으로 허용되었습니다. 후행 줄 바꿈없이 입력을받습니다.

apt, 22 바이트

"+Q ³sAJ fU"+Q ³sAJ fU

이 과제에 맞게 몇 바이트를 추가 한 표준 퀴네 프레임 워크 . 진실 = 일치, 거짓 = null. 온라인으로 사용해보십시오!

         // Implicit: U = input string, A = 10, J = -1, Q = quotation mark
"..."+Q  // Take this string and concatenate a quotation mark.
³        // Repeat three times.
sAJ      // Slice off the first 10 and last 1 chars.
fU       // Match U to the result.

Mathematica, 63 바이트

StringMatchQ[ToString[#0, InputForm], RegularExpression[#1]] & 

후행 공백에 유의하십시오. 표준 Mma quine 메커니즘을 사용하고 정규식과 일치하는지 테스트합니다.

펄, 21 바이트

open 0;$_=<0>=~$_

17 바이트 + 4 바이트 -pl0. 다음과 같이 실행하십시오.

echo open | perl -pl0 quinean

소스 파일에는 위의 코드 만 포함해야합니다 (shebang 없음, 후행 줄 바꿈 없음). 1정규식이 일치하면 출력 하고 일치하지 않으면 빈 문자열을 출력 합니다 (빈 문자열은 Perl에서 거짓).

입력이 개행으로 끝나지 않는 경우 4 바이트를 저장할 수 있습니다.

open 0;say<0>=~<>

다음과 같이 실행하십시오.

echo -n open | perl -M5.010 quinean

sayPerl 5.10+가 필요하고로 활성화해야합니다 -M5.010. Meta 에 따르면 " -M5.010필요한 경우 무료입니다"라는 점수는 17 바이트입니다.

작동 원리

이것은 표준 "속임수"퀘인에 대한 간단한 변형입니다.

open 0;print<0>

그러면 이름이 지정된 파일이 열리고로 $0내용을 읽습니다 <0>.

$_=<0>=~$_소스 파일에서 한 줄을 읽고 $_( -p플래그 가 읽은) 내용과 정규 표현식을 일치 시키고 결과를에 할당합니다 $_. 마지막에 자동으로 -p인쇄 $_됩니다.

줄프, 18 15 바이트

RegEx의 JS 풍미를 지원합니다. 여기 사용해보십시오! .

 h$code.value#i

댓글 :

  $code.value#      the document's element "code" (the program container)
_h            i     and output if it has (matches) the input string (i.e. regex)

𝔼𝕊𝕄𝕚𝕟, 14 자 / 26 바이트 (비경쟁)

⟮‼(ⒸⅩ222+ᶈ0)đï

Try it here (Firefox only).

챌린지 후 작성된 버그 수정 버전을 사용합니다.

설명

⟮‼(ⒸⅩ222+ᶈ0)đï // implicit: ï=input
⟮               // copy block: copy following code for later use
 (ⒸⅩ222+ᶈ0)   // take convert 10222 to char, add stuff inside copy block
‼           đï // check if input matches resulting string
               // implicit output

참고 : 복사 블록은 퀴네 연산자가 아닙니다. 변수 선언에 대한보다 다양한 대안이 될 것입니다.