To wyzwanie jest dość proste. Jako dane wejściowe przyjmujesz wyrażenie regularne.

Następnie wyprowadzasz prawdę / falsey, czy kod źródłowy pasuje do wyrażenia regularnego. To takie proste! Jeszcze tylko dwie rzeczy:

• Brak wbudowanych quine; możesz jednak uzyskać dostęp do kodu źródłowego kodu poprzez plik IO itp.
• To jest golf golfowy , więc wygrywa najkrótszy kod w bajtach !

Przykład

Jeśli powiedziano twój kod źródłowy abc, dane wejściowe a\wczwracałyby wartość true, a dane wejściowe a\dczwracałyby wartość false.

Powłoka Z, 12 bajtów

grep "$@"<$0

Warunki warunkowe Zsh rozumieją tylko kody wyjścia, a skrypty zamykają się odpowiednio z 0 lub 1.

Ponadto drukuje niepuste ciągi (kod źródłowy) dla dopasowania i puste dla niedopasowania, które mogą być tak prawdziwe jak / fałsz w połączeniu z test/ [.

Program odczytuje własny plik, ale zgodnie z tym komentarzem OP, jest to dozwolone.

JavaScript (ES6), 39

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

Python 3, 119 bajtów

To po prostu wygląda fajniej, IMO (i nie odczytuje pliku).

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

Python 3, 67 bajtów

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

Dodano po przeczytaniu tego komentarza .

Julia, 64 54 bajtów

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

Wyrażenia regularne Julia używają PCRE. Podczas gdy czytanie kodu źródłowego pliku jest standardową luką dla quinesów, w tym przypadku zostało to wyraźnie dozwolone. Pobiera dane wejściowe bez końca nowej linii.

Japt, 22 bajty

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

Standardowa konstrukcja quine z kilkoma bajtami dodanymi, aby sprostać temu wyzwaniu. Truthy = match (es), falsy = null. Wypróbuj online!

         // 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 bajty

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

Zwróć uwagę na spację końcową. Używa standardowego mechanizmu quine Mma i sprawdza, czy pasuje do wyrażenia regularnego.

Perl, 21 bajtów

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

17 bajtów plus 4 bajty dla -pl0. Uruchom tak:

echo open | perl -pl0 quinean

Plik źródłowy musi zawierać tylko powyższy kod (bez shebang, bez końcowego znaku nowej linii). Wyprowadza, 1jeśli wyrażenie regularne pasuje, a pusty ciąg znaków, jeśli nie (pusty ciąg jest falsey w Perlu).

Cztery bajty można zapisać, jeśli wejście nie gwarantuje zakończenia nowej linii:

open 0;say<0>=~<>

Uruchom tak:

echo -n open | perl -M5.010 quinean

saywymaga Perla 5.10+ i musi być włączony za pomocą -M5.010. Według Mety „w -M5.010razie potrzeby jest bezpłatny”, co daje wynik 17 bajtów.

Jak to działa

Jest to prosta odmiana standardowej „oszustwa”:

open 0;print<0>

Spowoduje to otwarcie nazwanego pliku $0i odczytanie zawartości za pomocą <0>.

$_=<0>=~$_czyta jeden wiersz z pliku źródłowego, wykonuje wyrażenie regularne względem zawartości $_(które zostały odczytane przez -pflagę) i przypisuje wynik do $_. -pdrukuje się $_automatycznie na końcu.

Jolf, 18 15 bajtów

Obsługuje smak JS RegEx, mam nadzieję, że jest w porządku. Wypróbuj tutaj! .

 h$code.value#i

Skomentowano:

  $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 znaków / 26 bajtów (niekonkurencyjny)

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

Try it here (Firefox only).

Używanie wersji z poprawkami błędów napisanymi po wyzwaniu.

Wyjaśnienie

⟮‼(ⒸⅩ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

UWAGA: Bloki kopiowania NIE są operatorami quine. Mają być bardziej wszechstronnymi alternatywami dla deklaracji zmiennych.