Chúng ta thường thấy các video âm nhạc trên Youtube. Nhiều kênh Youtube lưu trữ video âm nhạc được "cung cấp bởi VEVO". Chúng có thể được xác định dễ dàng bằng cách nhúng VEVO vào hình thu nhỏ video của chúng và gắn VEVO vào tên kênh của chúng.

Bây giờ hãy viết một số mã để kiểm tra xem một chuỗi do người dùng cung cấp có phải là tài khoản người dùng VEVO hay không.

Yêu cầu đối với chuỗi tài khoản người dùng VEVO hợp lệ:

• Chỉ được chứa chữ hoa, chữ thường và ký tự chữ số. (không có khoảng trắng hoặc dấu chấm câu)

• Không được vượt quá 80 ký tự.

• Phải có chuỗi con "VEVO" ở cuối chuỗi

Các trường hợp thử nghiệm:

Đầu vào hợp lệ:

AdeleVEVO
ConnieTalbotVEVO
SHMVEVO
justimberlakeVEVO
DJMartinJensenVEVO
test123VEVO

Đầu vào không hợp lệ:

syam kapuk
jypentertainment
Noche de Brujas
testVEVO123

Tất nhiên, vì đây là môn đánh gôn , tôi đang tìm mã ngắn nhất bằng bất kỳ ngôn ngữ lập trình nào.

Python 2 , 45 byte

-3 byte nhờ Rod. -2 byte nhờ vào các lò nướng.

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

Hãy thử trực tuyến!

Một giải pháp regex hóa ra là dài hơn.

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

Japt v2.0a0, 20 16 byte

Trả về 1hợp lệ hoặc 0không hợp lệ. [\l\d]cũng sẽ làm việc thay [^\W_]cho số byte tương tự.

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

Hãy thử nó | Kiểm tra tất cả các trường hợp kiểm tra

Giải thích : èđếm số lượng trận đấu của RegEx trong đầu vào. Trong Japt, \wlớp RegEx không bao gồm dấu gạch dưới.

JavaScript (ES6), 27 36 34 31 byte

Đã lưu 2 byte nhờ @Neil và 3 byte nhờ @Shaggy

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

Các trường hợp thử nghiệm

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 byte

-10 byte nhờ @Ismael Miguel đã sử dụng <?=thay vì <?php echo! và xóa thẻ đóng

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

Hãy thử trực tuyến!

Cảm ơn vì những câu trả lời khác vì vậy tôi đã không phải viết regex!

APL (Dyalog) , 25 byte

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

Hãy thử trực tuyến!

C (gcc) , 83 byte

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

Hãy thử trực tuyến!

APL Dyalog , 47 byte

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

Hãy thử trực tuyến!

Một giải pháp regex thuần túy là 32 byte , nhưng cũng nhàm chán hơn nhiều so với phương pháp này.

{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

Vết bẩn , 13 byte

e`n{-76"VEVO"

Hãy thử trực tuyến!

Không có gì lạ mắt ở đây. Khớp eđầu vào ntire với mẫu: nhiều nhất là 76 nký tự chữ alpha , theo sau là chuỗi VEVO. In 1cho khớp và 0không khớp. Tôi nhớ rằng trích dẫn cuối cùng có thể được gỡ bỏ ở cuối dòng, nhưng rõ ràng nó chỉ gây ra lỗi phân tích cú pháp.

C # (.NET Core) , 87 + 18 = 105 byte

Hãy thử trực tuyến!

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

> <> , 147 125 byte

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

Hãy thử trực tuyến!

> <> , 147 byte

Hãy thử trực tuyến!

Điều này in 1 nếu chuỗi đầu vào hợp lệ và không có gì cho đầu vào không hợp lệ.

Chỉnh sửa 1: Thay đổi kiểm tra chữ và số để sử dụng phạm vi thay vì so sánh với mọi ký tự. (tiết kiệm 22 byte)

Bash, 53 26 30 byte

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

Mã thoát 0 cho kết quả GIÁ TRỊ và 1 cho kết quả INVALID.

Vẫn hoạt động trên 80 ký tự hoặc ít hơn.

-27 byte từ việc loại bỏ đầu ra, nhờ @KeyWeeUsr

+4 byte, regex cố định (giống như mọi người khác)

Hãy thử trực tuyến!

> <> , 101 89 83 81 94 byte

Chỉnh sửa: Chuyển sang kiểm tra các ký tự không phải chữ và số thay vì chữ và số. Chuyển đổi lại khiến tôi quên kiểm tra giữa Z và a. Cảm ơn @Emigna. Rip các byte bị mất mặc dù

Chỉnh sửa 2: Ngoài ra, tôi hoàn toàn có thể thoát khỏi những cái đó}}}}. Cảm ơn Teal pelican vì điều đó và tìm ra vấn đề với TIO

Chỉnh sửa 3: thay thế một ~~~ bằng ap

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

Tôi không biết tại sao điều này sẽ không hoạt động trên TIO, nhưng nó hoạt động tốt ở đây . Vấn đề là các lệnh {} trong TIO không hoạt động cho một danh sách trống. Dùng thử tại đây

Làm thế nào nó hoạt động

!\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

Để thống nhất, thay thế; trong dòng cuối cùng với một lệnh không hợp lệ làm cho mọi đầu ra đều có lỗi.

C ++ 129 105 102 byte

Nhờ các câu trả lời khác cho tôi thấy rằng tôi có thể đếm số lượng ký tự
-2 byte nhờ vào Zacharý

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

LIÊN KẾT TIO

Xếp chồng lên nhau , 21 byte

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

Hãy thử trực tuyến!

05AB1E , 21 byte

žKÃQsg81‹IR4£"OVEV"QP

Hãy thử trực tuyến!

Java (OpenJDK 8) , 37 36 byte

Câu trả lời khá đơn giản bằng cách sử dụng một số regex đáng yêu.
Có thể là câu trả lời Java ngắn nhất tôi từng làm.
-1 byte nhờ Neil trả lời Javascript

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

Hãy thử trực tuyến!

Võng mạc , 18 byte

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

Hãy thử trực tuyến!

hoặc là

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

Hãy thử trực tuyến!

Haskell , 75 byte

-2 byte nhờ người dùng28667.

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

Hãy thử trực tuyến!

Deorst , 22 byte

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

Hãy thử trực tuyến!

Chỉ cần sử dụng regex được tìm thấy bởi Shaggy

V , 17 byte

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

Hãy thử trực tuyến!

Hexdump:

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

Regexes nén cho chiến thắng!

ø                   " 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 byte

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

Đầu ra 0nếu đúng, nilnếu sai

Hãy thử trực tuyến!

Sử dụng regex nhàm chán như mọi người khác.

Swift 4 , 113 byte

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

Hãy thử trực tuyến!

AWK , 23 byte

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

Hãy thử trực tuyến!

Xuất tên tài khoản nếu hợp lệ và không xuất ra thông tin nếu không hợp lệ

Sạch , 61 byte

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

Hãy thử trực tuyến!

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

-6 byte nhờ vào ETHproductions

Đã thêm 4 byte. Không thấy rằng gạch dưới không được phép.

Đây là sân golf đầu tiên của tôi, vì vậy đây là hy vọng tôi đã làm đúng.

Trả về 1 nếu hợp lệ, 0 nếu không.

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

Hãy thử trực tuyến!

Google Sheets, 33 byte

Hàm bảng tính ẩn danh nhận đầu vào từ phạm vi A1 và đầu ra cho ô gọi

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

Clojure , 146 byte

(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"))))

Hãy thử trực tuyến!

Điều này sẽ ngắn hơn nhiều khi sử dụng regex, nhưng tôi nghĩ rằng làm nó bằng tay sẽ thú vị hơn.

(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")))