_{Tiêu đề đánh cắp lấy cảm hứng từ câu trả lời Greg Hewgill của để sự khác biệt giữa JavaScript và Java là gì?}

Giới thiệu

Java và JavaScript là các ngôn ngữ được sử dụng phổ biến trong số các lập trình viên và hiện là các thẻ phổ biến nhất trên Stack Overflow. Tuy nhiên, như chúng ta đều biết, ngoài những cái tên tương tự, cả hai gần như không có gì chung.

Để tôn vinh một trong những cuộc tranh luận khét tiếng nhất của lập trình và được truyền cảm hứng từ những thất vọng gần đây của tôi trong việc tìm kiếm thẻ , tôi đề xuất như sau:

Thử thách

Viết chương trình lấy một chuỗi làm đầu vào. Trả về carnếu chuỗi bắt đầu bằng "Java" và không bao gồm "JavaScript". Nếu không, trở lại carpet.

Ví dụ đầu vào và đầu ra

xe hơi:

java
javafx
javabeans
java-stream
java-script
java-8
java.util.scanner
java-avascript
JAVA-SCRIPTING
javacarpet

thảm:

javascript
javascript-events
facebook-javascript-sdk
javajavascript
jquery
python
rx-java
java-api-for-javascript
not-java
JAVASCRIPTING

Ghi chú

• Khớp đầu vào phải không phân biệt chữ hoa chữ thường
• Chỉ các khả năng cho đầu ra nên carhoặccarpet
• Điểm thưởng tưởng tượng nếu câu trả lời của bạn sử dụng Java, JavaScript hoặc Regex
• Tiêu đề thay thế: Java là JavaScript vì ham là hamster

Đa giác Java / JavaScript, 108 107 106 byte

//\u000As->s.matches("(?i)(?!.*javascript)java.*"/*
a=>/(?!.*javascript)^java/i.test(a/**/)?"car":"carpet"

Chạy như Java

//\u000As->s.matches("(?i)(?!.*javascript)java.*"/*
a=>/(?!.*javascript)^java/i.test(a/**/)?"car":"carpet"

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

Lưu ý: không tin tưởng vào phần nổi bật vì nó không chính xác. Java thực, được giải thích chính xác trông giống như bên dưới bởi vì \u000Ađược diễn giải ở bước đầu tiên của quá trình biên dịch là \n, trên thực tế kết thúc nhận xét bắt đầu bằng nhận xét dòng ( //).

//
s->s.matches("(?i)(?!.*javascript)java.*"/*
a=>/(?!.*javascript)^java/i.test(a/**/)?"car":"carpet"

Chạy dưới dạng JavaScript

//\u000As->s.matches("(?i)(?!.*javascript)java.*"/*
a=>/(?!.*javascript)^java/i.test(a/**/)?"car":"carpet"

Tín dụng cho @CowsQuak cho phiên bản JS.

let f=

//\u000As->s.matches("(?i)(?!.*javascript)java.*"/*
a=>/(?!.*javascript)^java/i.test(a/**/)?"car":"carpet"

var a=["java","javafx","javabeans","java-stream","java-script","java-8","java.util.scanner","javascript","java-avascript","javascript-events","facebook-javascript-sdk","javajavascript","jquery","python","rx-java","java-api-for-javascript","not-java"];

for(var s of a) console.log(s.padStart(a.reduce((x,y)=>x.length>y.length?x:y).length) + "=>" + f(s));

Có bao nhiêu điểm thưởng tưởng tượng cho câu trả lời này?

-1 byte nhờ @Nevay trong câu trả lời Java.

JavaScript, 50 49 byte

Đã lưu 1 byte nhờ @ValueInk bằng cách sắp xếp lại regex

a=>/javascript|^(?!java)/i.test(a)?"car":"carpet"

Kiểm tra đoạn

let f=

a=>/javascript|^(?!java)/i.test(a)?"carpet":"car"

var a=["java","javafx","javabeans","java-stream","java-script","java-8","java.util.scanner","java-avascript","javascript","javascript-events","facebook-javascript-sdk","javajavascript","jquery","python","rx-java","java-api-for-javascript","not-java"];

for(var s of a) console.log(s.padStart(a.reduce((x,y)=>x.length>y.length?x:y).length) + "=>" + f(s));

Java (OpenJDK 8) , 92 82 72 58 57 byte

s->s.matches("(?i)(?!.*javascript)java.*")?"car":"carpet"

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

Lưu 1 byte nhờ @Nevay !

C (chỉ gọi đặt), 131 byte

f(int*s){char r[]="carpet";~*s&'AVAJ'||(r[3]=0);for(;*s&255;*(int*)&s+=1)~*s&'AVAJ'||~s[1]&'IRCS'||~s[2]&'TP'||(r[3]='p');puts(r);}

Nó có vấn đề của nó, nhưng nó vượt qua tất cả các testcase được cung cấp :)

g(int* s)
{
  char r[] = "carpet";
  ~*s&'AVAJ' || (r[3]=0);
  for(;*s & 255; *(int*)&s +=1)
    ~*s&'AVAJ' || ~s[1]&'IRCS' || ~s[2]&'TP' || (r[3]='p');
  puts(r);
}

Điểm thưởng tưởng tượng nếu câu trả lời của bạn sử dụng Java, Javascript hoặc Regex

tốt ... không, cảm ơn

05AB1E , 21 byte

lD'¦‚å≠sη'îáå*„¾„ƒ´#è

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

Python 2 , 68 byte

k=input().lower();print'car'+'pet'*(k[:4]!='java'or'javascript'in k)

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

-11 byte nhờ notjagan
-2 byte nhờ Dennis

C #, 80 78 byte

s=>(s=s.ToLower()).StartsWith("java")&!s.Contains("javascript")?"car":"carpet"

EXCEL Google Sheets, 89 86 byte

Đã lưu 3 byte nhờ Taylor Scott

=LEFT("carpet",6-3*ISERR(SEARCH("javascript",A1))+3*ISERR(IF(SEARCH("java",A1)=1,1,1/0

Đưa đầu vào vào A1

Giải trình

=LEFT("carpet",6-3*ISERR(SEARCH("javascript",A1))+3*ISERR(IF(SEARCH("java",A1)=1,1,1/0)))

 SEARCH("javascript",A1)        #Case-Insensitive Find, returns error if not found  
 ISERR(                         #Returns string true if error, False if not
 3*ISERR(                       #Forces TRUE/False as integer, multiplies by 3
 IF(SEARCH("java",A1)=1,1,1/0)  #If java found, returns integer. if 1, java begins string
                                #so returns 1, which will be turned into 0 by iserr.
                                #Else returns 1/0, which will be turned into 1 by iserr.
 LEFT(                          #Returns digits from the left, based upon count.

vim, 58 byte

gUU:s/.*JAVASCRIPT.*/Q/g
:s/^JAVA.*/car
:s/[A-Z].*/carpet

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

Thạch , 27 byte

,“Ẋṣ“®Ẓȷ»ŒlwЀ/Ḅn2‘×3“¢Ẹị»ḣ

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

Hồng ngọc , 42 + 1 = 43 byte

Sử dụng -pcờ.

$_="car#{"pet"if~/javascript|^(?!java)/i}"

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

Võng mạc ,  44  37 byte

Ai`^(?!.*javascript)java
.+
pet
^
car

Cảm ơn @MartinEnder vì đã chơi golf 7 byte!

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

Lisp thông thường, 131 125 byte

(lambda(s)(format()"car~@[pet~]"(or(<(length s)4)(not(#1=string-equal"java"(subseq s 0 4)))(search"javascript"s :test'#1#))))

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

Kích thước giảm nhờ # n = Thủ thuật lừa đảo của Lisp thông thường.

Giải trình

(lambda (s)                 ; anonymous function
  (format                   ; use of format string to produce the result
    ()                      ; the result is a string
    "car~@[pet~]"           ; print "car", then print "pet" when:
    (or (< (length s) 4)    ; the string is less then 4 characters or
        (not (string-equal "java" (subseq s 0 4)))     ; does not start with java or
        (search "javascript" s :test 'string-equal)))) ; contains javascript

C (tcc), 144 136 byte

a;f(s){char*t=s;for(;*t;a=!strncmp(s,"java",4))*t=tolower(*t++);for(t=s;*t;)s=strncmp(t++,"javascript",10)&&s;puts(a*s?"car":"carpet");}

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

Chưa được kiểm soát:

a;
f(s)
{
    char *t = s;
    for (; *t; a = !strncmp(s, "java", 4))
        *t = tolower(*t++);
    for (t=s; *t;)
        s = strncmp(t++, "javascript", 10) && s;
    puts(a*s ? "car"  :"carpet");
}

Excel, 84 byte

="car"&IF(AND(ISERR(SEARCH("javascript",A1)),IFERROR(SEARCH("java",A1),2)=1),,"pet")

VBA Excel, 76 byte

Chức năng cửa sổ tức thời VBE ẩn danh nhận đầu vào từ phạm vi [A1]và đầu ra là car/ carpettrạng thái cho cửa sổ ngay lập tức VBE

Không sử dụng RegExp

?"car"IIf(InStr(1,[A1],"Java",1)*(InStr(1,[A1],"JavaScript",1)=0),"","pet")

Python 3 , 95 byte

g=lambda s:(lambda r:'car' if r[:4]=='java' and 'javascript' not in r else 'carpet')(s.lower())

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

Vâng, nó có thể ngắn hơn nhưng tôi muốn thử sử dụng lambda lồng nhau!

Perl , 42 byte

Tôi tin rằng câu trả lời của stevieb có đầu ra không chính xác (bản thân tôi đã thử - nó trả lại xe cho 'javajavascript'). Điều này sẽ làm việc:

say/^java/i&&!/javascript/i?'car':'carpet'

Toán học, 82 byte

regex

If[#~StringMatchQ~RegularExpression@"(?i)(?!.*javascript)^java.*","Car","Carpet"]&

JAISBaL , 36 byte

℠℘(?!.*javascript)^java.*}͵Ucar½Upet

Verbose / giải thích:

# \# enable verbose parsing #\
tolower                           \# [0] convert the top value of the stack to lowercase #\
split (?!.*javascript)^java.*}    \# [1] split the top value of the stack by (?!.*javascript)^java.*} #\
arraylength                       \# [2] push the length of the array onto the stack #\
print3 car                        \# [3] print car #\
!if                               \# [4] if the top value on the stack is falsy, skip the next statement #\
print3 pet                        \# [5] print pet #\

J. -regex ... nhưng không hỗ trợ regex nào khác .... vì lý do.

Regex bị đánh cắp mượn từ câu trả lời của @Cows Quack .

Python 2 , 69 byte

f=input().lower().find
print'car'+'pet'*(f('java')!=~f('javascript'))

Hiện tại dài hơn 1 byte so với giải pháp Python 2 ngắn nhất.

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

Perl , 36 byte

say/^java(?!script)/i?"car":"carpet"

Chạy nó như vậy:

perl -nE 'say/^java(?!script)/i?"car":"carpet"' java.txt

Mẻ, 91 byte

@set/ps=
@set t=%s:~0,4%
@if "%t:java=%%s:javascript=%"=="%s%" (echo car)else echo carpet

Đưa đầu vào vào STDIN. Batch không có toán tử so sánh không phân biệt chữ hoa chữ thường nhưng nó có sự thay thế chuỗi không phân biệt chữ hoa chữ thường để tôi có thể gán tạm thời cho bốn ký tự đầu tiên và sau đó trường hợp không thay thế java, do đó sẽ dẫn đến chuỗi trống. Trong khi đó, trường hợp tôi vô cảm thay thế javascript trong chuỗi gốc, nên giữ nguyên nó.

Lua, 96 byte

function(x)return x:lower():match"^java"and not x:lower():match"javascript"and"car"or"carpet"end

Perl, 98 84 62 byte

sub a{"car".($_[0]=~/javascript/i||$_[0]!~/^java/i?'pet':'');}

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

Cảm ơn

Phi tiêu VM, 104 byte 102 byte

main(p){p=p[0].toLowerCase();print("car${p.indexOf('java')==0&&p.indexOf('javascript')<0?'':'pet'}");}

Giải thích :

Bị thoái hóa:

main(p)
{
    p = p[0].toLowerCase();
    print("car${p.indexOf('java') == 0 && p.indexOf('javascript') < 0 ? '' : 'pet'}");
}

Chúng tôi có chức năng chính thông thường của chúng tôi

Chúng tôi thay thế pbằng p[0].toLowerCase();để chúng tôi không phải khai báo một biến mới (var cộng với một khoảng trắng sẽ có thêm 4 byte)

Sau đó chúng tôi tiến hành in ấn thực tế

Chúng tôi in carvô điều kiện và chúng tôi sử dụng các câu lệnh nội tuyến để kiểm tra xem có nên in petsau nó hay không. Nếu nó có chuỗi 'java' ở chỉ số 0 và không có 'javascript', chúng tôi không làm gì cả (chúng tôi thực sự nối thêm một chuỗi trống nhưng nó không có tác dụng gì) và nếu không chúng tôi sẽ nối thêm pet.

Rust, 97 byte

let s=if Regex::new(r"^javascript|^!java$").unwrap().is_match("javascript"){"carpet"}else{"car"};

Tôi khá chắc chắn rằng có một giải pháp ngắn hơn nhưng đó là lần thử đầu tiên của tôi :)

Bracmat , 66 byte

(f=.pet:?b&@(low$!arg:(? javascript ?|java ?&:?b|?))&str$(car !b))

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