_{Tytuł skradzione zainspirowany odpowiedź Greg Hewgill jest na czym polega różnica między JavaScript i Java?}

Wprowadzenie

Java i JavaScript są powszechnie używanymi językami wśród programistów i są obecnie najpopularniejszymi tagami w przepełnieniu stosu. Jednak, jak wszyscy wiemy, oprócz podobnych nazw, te dwa nie mają ze sobą prawie nic wspólnego.

Na cześć jednej z najbardziej niesławnych debat programistycznych i zainspirowanych moimi ostatnimi frustracjami związanymi z wyszukiwaniem tagów , proponuję:

Wyzwanie

Napisz program, który pobiera ciąg znaków jako dane wejściowe. Zwraca, carjeśli ciąg zaczyna się od „Java” i nie zawiera „JavaScript”. W przeciwnym razie wróć carpet.

Przykład wejścia i wyjścia

samochód:

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

wykładzina podłogowa:

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

Notatki

• Dopasowanie danych wejściowych powinno nie uwzględniać wielkości liter
• Jedynymi możliwościami wyjścia powinny być carlubcarpet
• Wyimaginowane punkty bonusowe, jeśli Twoja odpowiedź używa Java, JavaScript lub Regex
• Alternatywny tytuł: Java to JavaScript, podobnie jak szynka to chomik

Java / JavaScript Polyglot, 108 107 106 bajtów

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

Uruchom jako Java

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

Wypróbuj online!

Uwaga: nie ufaj wyróżnieniu, ponieważ jest nieprawidłowe. Prawdziwa Java, poprawnie zinterpretowana, wygląda jak poniżej, ponieważ \u000Ajest interpretowana na pierwszym etapie kompilacji jako \nde facto kończąca komentarz, który zaczął się od komentarza wierszowego ( //).

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

Uruchom jako JavaScript

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

Kredyty dla @CowsQuak dla wersji 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));

Ile wyimaginowanych punktów bonusowych za tę odpowiedź?

-1 bajt dzięki @Nevay w odpowiedzi Java.

JavaScript, 50 49 bajtów

Zaoszczędzono 1 bajt dzięki @ValueInk, zmieniając regex

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

Testowy fragment kodu

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 bajtów

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

Wypróbuj online!

1 bajt zapisany dzięki @Nevay !

C (tylko wywołanie put), 131 bajtów

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);}

Ma swoje problemy, ale przechodzi wszystkie dostarczone przypadki testowe :)

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);
}

Wyimaginowane punkty bonusowe, jeśli Twoja odpowiedź korzysta z Java, JavaScript lub Regex

cóż ... nie, dziękuję

05AB1E , 21 bajtów

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

Wypróbuj online!

Python 2 , 68 bajtów

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

Wypróbuj online!

-11 bajtów dzięki notjagan
-2 bajty dzięki Dennisowi

C #, 80 78 bajtów

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

EXCEL Arkusze Google, 89 86 bajtów

Zaoszczędź 3 bajty dzięki Taylor Scott

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

Pobiera dane na A1

Wyjaśnienie

=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 bajtów

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

Wypróbuj online!

Galaretka , 27 bajtów

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

Wypróbuj online!

Rubin , 42 + 1 = 43 bajty

Używa -pflagi.

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

Wypróbuj online!

Retina ,  44  37 bajtów

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

Dzięki @MartinEnder za grę w golfa z 7 bajtów!

Wypróbuj online!

Common Lisp, 131 125 bajtów

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

Wypróbuj online!

Rozmiar zmniejszony dzięki # n = „trickowi” Common Lisp.

Wyjaśnienie

(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 bajtów

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");}

Wypróbuj online!

Rozwinięty:

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 bajty

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

Excel VBA, 76 bajtów

Anonimowa funkcja bezpośredniego okna VBE, która pobiera dane wejściowe z zakresu [A1]i danych wyjściowych to car/ carpetstatus do bezpośredniego okna VBE

Nie używa RegExp

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

Python 3 , 95 bajtów

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

Wypróbuj online!

Tak, może być krótszy, ale chciałem spróbować użyć zagnieżdżonej lambdy!

Perl , 42 bajty

Wierzę, że odpowiedź stevieba ma niepoprawny wynik (sam tego spróbowałem - zwraca samochód dla „javajavascript”). To powinno działać:

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

Mathematica, 82 bajty

regex

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

JAISBaL , 36 bajtów

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

Pełne / wyjaśnienie:

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

JAISBaL to moja pierwsza próba zaprojektowania języka golfowego, więc jest raczej dziwaczna ... nie ma żadnych dopasowań ani zawiera, wyrażeń regularnych lub w inny sposób, więc zamiast tego musimy podzielić i sprawdzić wynikową długość tablicy ... ponieważ JAISBaL ma podział według -regex ... ale żadne inne wsparcie wyrażeń regularnych ... z powodów.

Regex skradziony pożyczony od odpowiedzi @Cows Quack .

Python 2 , 69 bajtów

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

Obecnie 1 bajt dłuższy niż najkrótsze rozwiązanie Python 2.

Wypróbuj online!

Perl, 36 bytes

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

Run it as such:

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

Batch, 91 bytes

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

Takes input on STDIN. Batch doesn't have a case insensitive comparison operator but it does have case insensitive string replacement so I can assign a temporary to the first four characters and then case insensitively replace java, which should then result in the empty string. Meanwhile I case insensitively replace javascript in the original string, which should leave it unchanged.

Lua, 96 bytes

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

Perl, 98 84 62 Bytes

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

Try it online!

Thanks to bytepusher

Dart VM, 104 bytes 102 bytes

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

Explanation:

Degolfed:

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

We have our usual main function

We replace p with p[0].toLowerCase(); so that we don't have to declare a new variable (var plus a space would be 4 extra bytes)

We then proceed to do the actual printing

We print car unconditionally and we use inline statements for checking whether to print pet after it or not. If it has the string 'java' at index 0 and does not have 'javascript' in it, we do nothing (we actually append an empty string but it does not have any effect) and otherwise we append pet.

Rust, 97 bytes

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

I'm pretty sure that there is a shorter solution but it's my first try :)

Bracmat, 66 bytes

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

Try it online!