Często oglądamy teledyski na Youtube. Wiele kanałów YouTube, na których znajdują się teledyski, jest „obsługiwanych przez VEVO”. Można je łatwo zidentyfikować, osadzając VEVO w miniaturach filmów i dodając VEVO do nazwy kanału.

Teraz napisz kod, aby sprawdzić, czy ciąg podany przez użytkownika jest kontem użytkownika VEVO, czy nie.

Wymagania dotyczące prawidłowych ciągów kont użytkowników VEVO:

• Może zawierać tylko wielkie i małe litery oraz cyfry. (bez białych znaków i interpunkcji)

• Nie może przekraczać 80 znaków.

• Musi mieć podciąg „VEVO” na końcu łańcucha

Przypadki testowe:

Prawidłowe dane wejściowe:

AdeleVEVO
ConnieTalbotVEVO
SHMVEVO
justimberlakeVEVO
DJMartinJensenVEVO
test123VEVO

Nieprawidłowe dane wejściowe:

syam kapuk
jypentertainment
Noche de Brujas
testVEVO123

Oczywiście, ponieważ jest to gra w golfa , szukam najkrótszego kodu w dowolnym języku programowania.

Python 2 , 45 bajtów

-3 bajty dzięki Rod. -2 bajty dzięki ovs.

lambda s:len(s)<81*s.isalnum()<'VEVO'==s[-4:]

Wypróbuj online!

Rozwiązanie wyrażenia regularnego okazuje się być dłuższe.

lambda s:re.match('^[^\W_]{0,76}VEVO$',s)
import re

Japt v2.0a0, 20 16 bajtów

Zwraca 1za ważne lub 0za nieprawidłowe. [\l\d]działałby również zamiast [^\W_]tej samej liczby bajtów.

è/^\w{0,76}VEVO$

Wypróbuj | Sprawdź wszystkie przypadki testowe

Objaśnienie : èzlicza liczbę dopasowań RegEx na wejściu. W Japt \wklasa RegEx nie zawiera podkreślenia.

JavaScript (ES6), 27 36 34 31 bajtów

Zaoszczędzono 2 bajty dzięki @Neil i 3 bajty dzięki @Shaggy

s=>/^[^\W_]{0,76}VEVO$/.test(s)

Przypadki testowe

let f =

s=>/^[^\W_]{0,76}VEVO$/.test(s)

console.log(f('syam kapuk')) // (INVALID)
console.log(f('jypentertainment')) // (INVALID)
console.log(f('Noche de Brujas')) // (INVALID)
console.log(f('testVEVO123')) // (INVALID)
console.log(f('AdeleVEVO')) // (VALID)
console.log(f('ConnieTalbotVEVO')) // (VALID)
console.log(f('SHMVEVO')) // (VALID)
console.log(f('justimberlakeVEVO')) // (VALID)
console.log(f('DJMartinJensenVEVO')) // (VALID)

PHP , 51 bajtów

-10 bajtów dzięki @Ismael Miguel za użycie <?=zamiast <?php echo! i usunięcie tagu zamykającego

<?=preg_match("/^[^\W_]{0,76}VEVO$/",fgets(STDIN));

Wypróbuj online!

Dzięki za inne odpowiedzi, więc nie musiałem pisać wyrażenia regularnego!

APL (Dyalog) , 25 bajtów

≢'^[^_\W]{0,76}VEVO$'⎕S 3

Wypróbuj online!

C (gcc) , 83 bajty

c,i;f(char*s){for(c=i=0;s[i];c+=!isalnum(s[i++]));c=i<81*!c*!strcmp("VEVO",s+i-4);}

Wypróbuj online!

Dyalog APL , 47 bajtów

{0::0⋄(∧/(1(819⌶)t)∊⎕A,⎕D)∧77>≢t←,∘'VEVO'⍣¯1⊢⍵}

Wypróbuj online!

Czyste wyrażenie regularne ma 32 bajty , ale jest też o wiele bardziej nudne niż to podejście.

{0::0⋄(∧/(1(819⌶)t)∊⎕A,⎕D)∧77>≢t←,∘'VEVO'⍣¯1⊢⍵} a dfn with right arg '⍵'
 0::0⋄                                          on error, return 0
                                 ,∘'VEVO'       a train that appends VEVO
                                         ⍣¯1    apply it -1 times
                                             ⍵  on '⍵'
                                                and error if impossible (which returns 0)
                               t←               save on variable 't'
                              ≢                 get the length of that
                           77>                  if that's smaller than 77
                          ∧                     and
         (1(819I)t)                              [for each of] 't' uppercased
                   ∊⎕A,⎕D                        is it in the uppercase alphabet concatenated with the digits
       ∧/                                        reduced by and

Brud , 13 bajtów

e`n{-76"VEVO"

Wypróbuj online!

Nic szczególnego tutaj. Dopasuj edane wejściowe do wzorca: maksymalnie 76 nznaków alfanumerycznych, po których następuje ciąg VEVO. Drukuje 1dla dopasowania i 0bez dopasowania. Przypomniałem sobie, że ostatni cytat można usunąć na końcu wiersza, ale najwyraźniej powoduje to tylko błąd analizy.

C # (.NET Core) , 87 + 18 = 105 bajtów

Wypróbuj online!

a=>a.Where(x=>char.IsLetterOrDigit(x)).Count()==a.Length&a.Length<81&a.EndsWith("VEVO")

> <> , 147 125 bajtów

!\i:0(?^1[::::::"/9@Z`z"!
;>{(?;{(?v{(?;{(?v{(?;{(?v
 ~l1-?!v >       > !|!: !<
;v    ]/~l99*-0(?!;4["OVEV"{-?;{-?;{-?;{-?;1n

Wypróbuj online!

> <> , 147 bajtów

Wypróbuj online!

Wypisuje 1, jeśli ciąg wejściowy jest prawidłowy i nic dla niepoprawnego wejścia.

Edycja 1: Zmieniono kontrole alfanumeryczne, aby używać zakresów zamiast porównywania z każdym znakiem. (oszczędność 22 bajtów)

Bash, 53 26 30 bajtów

[[ $1 =~ ^[^\W_]{0,76}VEVO$ ]]

Wyjdź z kodu 0 dla WAŻNYCH wyników i 1 dla NIEPRAWIDŁOWYCH wyników.

Nadal pracuję na 80 lub mniej znaków.

-27 bajtów od usunięcia danych wyjściowych dzięki @KeyWeeUsr

+4 bajty, naprawiono wyrażenia regularne (tak samo jak wszyscy inni)

Wypróbuj online!

> <> , 101 89 83 81 94 bajtów

Edycja: Przełączono na sprawdzanie znaków niealfanumerycznych zamiast alfanumerycznych. Odsunięto, bo zapomniałem sprawdzić między Z i a. Dzięki @Emigna. Zgrywaj te utracone bajty

Edycja 2: Mogę też całkowicie się ich pozbyć}}}}. Dzięki Teal Pelikan za to i znalezienie problemu z TIO

Edycja 3: zastąpiono ~~~ ap

!\i::0(?v:::"/")$":"(*$:"`")$"{"(*+$:"@")$"["(*+?
0/?("S"l/
l/"VEVO"[4pn?$0(6
!\{-?vl?
1/;n0/n

Nie wiem, dlaczego to nie zadziała w TIO, ale tutaj działa dobrze . Problem polegał na tym, że polecenia {} w TIO nie działają dla pustej listy. Wypróbuj tutaj

Jak to działa

!\i::0(?v:::"/")$":"(*$:"`")$"{"(*+$:"@")$"["(*+?
0/....../
......... Checks each input is alphanumeric
...       If any isn't, print 0 and exit with an error
...

...
0/?("S"l/ Checks if there are more than 80 characters
...       If so, print 0 and exit with an error
...
...

...
...
l/"VEVO"[4pn?$0(6 Check if the input is less than 4 characters
...               If so, print 0 and exit with an error
...

...
...
./"VEVO"[4pn?$0(6 Take the last 4 characters of the input into a new stack (first time I've actually used [)
...               Add "VEVO" to the stack to compare
...

...
0/....../n
........V
!\{-?vl?  Check if the last 4 characters are VEVO
1/;n0/n   Print 1 and exit with an error if so, else print 0 and exit

Dla spójności, zastępując; w ostatnim wierszu z niepoprawną instrukcją powoduje, że każde wyjście jest błędem.

C ++, 129 105 102 bajtów

Dzięki innym odpowiedziom, które pokazały mi, że
dzięki Zacharýmu mogę policzyć liczbę znaków -2 bajty

#include<regex>
int v(std::string s){return std::regex_match(s, std::regex("[a-zA-Z0-9]{0,76}VEVO"));}

TIO LINK

Skumulowane , 21 bajtów

['^\i{0,76}VEVO'-''=]

Wypróbuj online!

05AB1E, 21 bytes

žKÃQsg81‹IR4£"OVEV"QP

Try it online!

Java (OpenJDK 8), 37 36 bytes

Pretty simple answer using some lovely regex.
Quite possibly the shortest Java answer I've ever done.
-1 bytes thanks to Neil on the Javascript answer

w->w.matches("((?!_)\\w){0,76}VEVO")

Try it online!

Retina, 18 bytes

A`\W|_|.{81}
VEVO$

Try it online!

or

^[^\W_]{0,76}VEVO$

Try it online!

Haskell, 75 bytes

-2 bytes thanks to user28667.

import Data.Char
f s|l<-length s=all isAlphaNum s&&l<81&&drop(l-4)s=="VEVO"

Try it online!

Deorst, 22 bytes

'^[^\W_]{0,76}VEVO$'gm

Try it online!

Just uses the regex found by Shaggy

V, 17 bytes

ø^¨áüä©û,76}VEVO$

Try it online!

Hexdump:

00000000: f85e a8e1 fce4 a9fb 2c37 367d 5645 564f  .^......,76}VEVO
00000010: 24                                       $

Compressed regexes for the win!

ø                   " Count the number of matches of
 ^                  "   The beginning of the line
  ¨áüä©             "   A letter or number...
       û,76}        "   From 0 to 76 times...
            VEVO    "   Followed by "VEVO"
                $   "   At the end of the line

Ruby -n, 22+1 = 23 bytes

p~/^[^\W_]{0,76}VEVO$/

Output 0 if true, nil if false

Try it online!

Using the same boring regex as everybody else.

Swift 4, 113 bytes

import Foundation;var f={(s:String)->Bool in s.range(of:"^[^\\W_]{0,76}VEVO$",options:.regularExpression) != nil}

Try it online!

AWK, 23 bytes

$0~/^[^\W_]{0,76}VEVO$/

Try it online!

Outputs the account name if valid, and outputs nothing if it isn't valid

Clean, 61 bytes

import StdEnv
?['VEVO']=True
?[_:l]=length l<80&& ?l
?_=False

Try it online!

Perl 5, 35 29+1(-a) = 30 bytes

-6 bytes thanks to ETHproductions

Added 4 bytes. Didn't see that underscore wasn't allowed.

This is my first golf, so here's hoping I did it right.

Returns 1 if valid, 0 if not.

print/^[^\W_]{0,76}VEVO$/?1:0

Try it online!

Google Sheets, 33 Bytes

Anonymous worksheet function that takes input from range A1 and outputs to the calling cell

=RegexMatch(A1,"^[^\W_]{0,76}VEVO

Clojure, 146 bytes

(fn[u](let[c count](and(<(c u)81)(=(c(filter #(let[i(int %)](or(< 47 i 58)(< 64 i 91)(< 96 i 123)))u))(c u))(clojure.string/ends-with? u"VEVO"))))

Try it online!

This would be much shorter using a regex, but I figured doing it manually would be more interesting.

(defn vevo? [username]
  (and (< (count username) 81)

       ; Filter out the illegal characters, then check if the length is the same as the original string
       (= (count (filter #(let [i (int %)]
                            ; Make sure the char code is in the valid ranges
                            (or (< 47 i 58) (< 64 i 91) (< 96 i 123)))
                         username))
          (count username))

       (clojure.string/ends-with? username "VEVO")))