เราทุกคนรู้ว่าถ้าคุณ google คำว่า "google" มันจะทำลายอินเทอร์เน็ต

งานของคุณคือการสร้างฟังก์ชั่นที่ยอมรับหนึ่งสตริงและส่งคืนความยาวในอักขระ Unicode ที่เป็นไปได้น้อยที่สุด

อย่างไรก็ตามหากสตริงที่กำหนดคือgoogle(ตัวพิมพ์เล็ก) ก็จะทำให้เกิดข้อผิดพลาด

ตัวอย่างเช่นg('bing')จะกลับมา4แต่g('google')จะทำให้เกิดข้อผิดพลาด

โปรดระบุตัวอย่างการใช้งานและข้อผิดพลาดหากเป็นไปได้

Python 2, 29

lambda x:len(x)/(x!='google')

ให้ZeroDivisionErrorบน"google"และความยาวเป็นอย่างอื่น นี้ใช้ประโยชน์ของบูลี ธ เท่ากับและ01

Excel, 23 ตัวอักษร

วางสิ่งนี้ลงในเซลล์อื่นที่ไม่ใช่ A1 และพิมพ์คำค้นหาของคุณลงใน A1

=LEN(A1)/(A1<>"google")

ตัวอย่างเช่น:

C #, 43 ไบต์

การปรับปรุงคำตอบของ Salah Alami เรียกใช้ซ้ำเพื่อยกเว้นสแต็กโอเวอร์โฟลว์ที่ระบุ "google"

int g(string s)=>s!="google"?s.Length:g(s);

Pyth, 14 13 ตัวอักษร

L/lbnb"google

yกำหนดฟังก์ชันการตั้งชื่อ

สิ่งนี้หารความยาวด้วย 1 ถ้าสตริงไม่ใช่googleและเป็น 0 มิฉะนั้น ความคิดไม่ใช่เรื่องแปลกใหม่ แต่ฉันคิดขึ้นมาเอง

ลองออนไลน์

มันทำงานอย่างไร

L                 Define y(b):
  lb                Compute len(b).
    nb"google       Compute (b != "google").
 /                  Set _ = len(b) / (b != "google").
                  Return _. (implicit)

MATLAB, 63 41 40 38 36 ไบต์

ขอบคุณ Tom Carpenter ที่ช่วยกำจัด 1 ไบต์!

ขอบคุณ Stewie Griffin สำหรับการโกนหนวด 2 ไบต์!

@(x)nnz(x(+~strcmp('google',x):end))

ซึ่งแตกต่างจากการแก้ปัญหาที่สง่างามมากขึ้นอื่น ๆ ดำเนินการส่วนหนึ่งโดยการดำเนินการศูนย์ใน MATLAB จะไม่ให้เกิดข้อผิดพลาด Infแต่ การแก้ปัญหานี้พบว่าความยาวของสตริงโดยnnzการแก้ปัญหานี้พบว่าความยาวของสตริงโดยสตริงที่ผลิตนั้นเป็นแบบที่คุณทำดัชนีจากจุดเริ่มต้นของสตริงจนถึงจุดสิ้นสุดซึ่งเป็นสำเนาของสตริง 'google'แต่สิ่งที่สำคัญคือจุดเริ่มต้นของการที่จะเข้าถึงสตริงที่ผลิตโดยการตรวจสอบหรือไม่ว่าการป้อนข้อมูลที่มีค่าเท่ากับ หากไม่ใช่นี่จะสร้างดัชนีเริ่มต้นที่ 1 และเราจัดทำดัชนีลงในสตริงตามปกติ ... เนื่องจาก MATLAB เริ่มทำดัชนีที่ 1 ควรเป็นเท่ากันดัชนีที่ผลิตคือ 0 และ MATLAB จะโยนข้อผิดพลาดการทำดัชนีระบุว่า ดัชนีต้องเป็นจำนวนเต็มบวก ความพิเศษ+เพื่อให้มั่นใจว่าการส่งออกของการตรวจสอบความเสมอภาคเป็นตัวเลขมากกว่าแบบบูลlogical/ การละเว้น+จะสร้างคำเตือน แต่เนื่องจากข้อกำหนดของความท้าทายนี้ไม่อนุญาตให้มีคำเตือน+จึงจำเป็นต้องใช้ ... ดังนั้นจึงต้องกรอกรหัส

ตัวอย่างการใช้

>> f=@(x)nnz(x(+~strcmp('google',x):end)) %// Declare anonymous function

f = 

    @(x)nnz(x(+~strcmp('google',x):end))

>> f('bing')

ans =

     4

>> f('google')
Subscript indices must either be real positive integers or logicals.

Error in @(x)nnz(x(+~strcmp('google',x):end))

รุ่นที่สนุกสนานยิ่งขึ้น83 77 76 74 72 ไบต์

ขอบคุณ Tom Carpenter ที่ช่วยกำจัด 1 ไบต์!

ขอบคุณ Stewie Griffin สำหรับการโกนหนวด 2 ไบต์!

@(x)eval('if strcmp(''google'',x),web([x ''.com/i'']);else nnz(x),end');

ข้างต้นไม่ใช่การส่งอย่างเป็นทางการ แต่เป็นสิ่งที่สนุกยิ่งขึ้นในการใช้งาน เหยียดหยามevalภายในฟังก์ชั่นที่ไม่ระบุชื่อสิ่งที่รหัสไม่สามารถที่จะตรวจสอบเพื่อดูว่าสายป้อนเท่ากับ'google'... และถ้ามันเป็นอย่างนี้จะเปิดขึ้นในตัวเว็บเบราว์เซอร์ของ MATLAB และแสดงหน้าข้อผิดพลาด 404 ของ Google พยายามที่จะเข้าถึง หน้าย่อยอยู่ที่iเมื่อไม่มีอยู่ ถ้าไม่เราแสดงความยาวของสตริงตามปกติ

ตัวอย่างการใช้

>> f=@(x)eval('if strcmp(''google'',x),web([x ''.com/i'']);else nnz(x),end'); %// Declare anonymous function
>> f('bing')

ans =

     4

>> f('google')
>> 

การโทรครั้งสุดท้ายที่ใช้'google'ทำให้หน้าจอนี้:

JavaScript ES6, 34 27 25 ตัวอักษร

f=>f=='google'?Δ:f.length

เปิดการอ้างอิงข้อผิดพลาดΔสำหรับ google

alert((f=>f=='google'?Δ:f.length)('test'))

TI-BASIC ขนาด 15 ไบต์

ในขณะที่เราอยู่ที่นี่เฮ็คก็อาจได้รับคำตอบจาก TI-BASIC มาด้วย

"string":prgmNAMEรูปแบบอินพุตเป็น ขอมอบเครดิตให้กับThomas Kwaสำหรับการค้นหาครั้งแรก!

length(Ans)+log(Ans≠"GOOGLE

(คำแนะนำ: เพิ่ม 1 ไบต์สำหรับตัวอักษรพิมพ์เล็กแต่ละตัวแทนตัวพิมพ์ใหญ่หนึ่งตัวดังนั้นs/GOOGLE/google/g => +6 bytes)

กรณีทดสอบ ahhhhh!

"GOGGLE":prgmG
               6
"BING":prgmG
               4
"GOOGLE":prgmG
           Error

APL (14)

(⍴÷'google'∘≢)

คำอธิบาย:

• ⍴: ความยาว
• ÷: หารด้วย
• 'google∘≢: อาร์กิวเมนต์ไม่เท่ากับ'google'

⍴ให้ความยาวของสตริงซึ่งหารด้วย 1 ถ้าสตริงไม่เท่ากันgoogle(ซึ่งให้ความยาวกลับไม่เปลี่ยนแปลง) หรือ 0 ถ้าสตริงไม่เท่ากันgoogle(ให้ข้อผิดพลาด)

Python 3, 30 ไบต์

lambda u:[len][u=='google'](u)

จัดทำดัชนีรายการฟังก์ชัน 1 องค์ประกอบโดยเพิ่มIndexErrorเงื่อนไขถ้าu=='google'เป็นTrue(= 1) ฟังก์ชั่นดังกล่าว

หลากหลายรูปแบบ ว้าว:

lambda u:[len(u)][u=='google']
lambda u:len([u][u=='google'])

หากความท้าทายกลับด้าน (ข้อผิดพลาดในทุกสิ่งที่ไม่ใช่ "google") สามารถบันทึกตัวอักษร:

lambda u:{'google':len}[u](u)

แต่คุณรู้ความยาวอยู่แล้วดังนั้นลองใส่ฮาร์โค้ด

Haskell, 24 ไบต์

g s|s/="google"=length s

เอาท์พุท:

Main> g "google"

Program error: pattern match failure: g "google"

Main> g "bing"
4

CJam, 16 ตัวอักษร

{_,\"google"=!/}

สิ่งนี้หารความยาวด้วย 1 ถ้าสตริงไม่ใช่googleและเป็น 0 มิฉะนั้น ความคิดไม่ใช่เรื่องแปลกใหม่ แต่ฉันคิดขึ้นมาเอง

ลองออนไลน์

มันทำงานอย่างไร

_                 Push a copy of the string on the stack.
 ,                Compute the length of the copy.
  \               Swap the length and the original string.
   "google"=      Push 1 if the string is "google", 0 otherwise.
            !     Apply logical NOT. Maps 1 to 0 and 0 to 1.
             /    Divide the length by the Boolean.

อ็อกเทฟ 63 ไบต์

ฉันรู้ว่ามันยาวกว่าโซลูชัน Matlab (ซึ่งจะทำงานใน Octave ด้วย) แต่มันก็ชั่วร้ายเป็นพิเศษ ฉันกำลังสร้างฟังก์ชั่นที่ไม่ระบุชื่อ (ความชั่วร้าย) โดยใช้ตัวอักษร (ชั่วร้าย) ของเซลล์อาร์เรย์ (ความชั่วร้าย) ที่มีฟังก์ชั่นที่จับขึ้นอยู่กับฟังก์ชั่นการโทรกลับ (ตัวเองจึงเรียกซ้ำความชั่วร้าย) จากนั้นฉันจะสร้างแบบไม่ระบุตัวตนอีกอันที่ช่วยลดฟังก์ชั่นอาร์กิวเมนต์สตริงและแก้ไขข้อโต้แย้งที่สองของfเป็นf(ชั่วร้ายมาก) มนุษย์ที่มีสติจะไม่ทำสิ่งนี้เพราะมันเกือบจะอ่านไม่ได้เหมือน Perl หรือ regex (หรือ cjam / pyth / esolang อื่น ๆ )

ดังนั้นหากสตริงไม่ใช่ 'google' อาร์กิวเมนต์ที่สองของอาร์เรย์เซลล์จะถูกเรียกใช้ซึ่งจะแสดงผลตามความยาวของสตริง มิฉะนั้นฟังก์ชั่นแรกจะถูกเรียกซึ่งถูกส่งผ่านเป็นโทรกลับ (และผ่านตัวเองเป็นโทรกลับไปยังตัวเองเกินไป) ซึ่งในภายหลังเป็นฟังก์ชั่นของตัวเอง ข้อผิดพลาดนั้นเป็นข้อผิดพลาดความลึกของการเรียกซ้ำสูงสุด

f=@(s,f){@()f(s,f),numel(s)}{2-strcmp(s,'google')}();@(s)f(s,f)

JavaScript ขนาด 25 ไบต์

ตัวอย่าง JavaScript ที่ดีและเรียบง่าย:

e=>e!='google'?e.length:g

หากป้อน "google" แล้วจะส่ง a ReferenceError

ตัวอย่าง

alert((e=>e!='google'?e.length:g)('test'))

APL, 19 17 ไบต์

{⍵≡'google':⍟⋄≢⍵}

googleนี้เป็นฟังก์ชั่นเอกชื่อที่จะโยนความผิดพลาดทางไวยากรณ์ถ้าใส่เป็น นี่คือความสำเร็จโดยพยายามที่จะใช้ลอการิทึมธรรมชาติของอะไร

{
 ⍵≡'google':          ⍝ If the right argument is "google"...
            ⍟⋄        ⍝ Compute log(<nothing>), which brings only sadness
              ≢⍵      ⍝ Otherwise compute the length
}

ลองออนไลน์

บันทึกสองไบต์ด้วยเดนนิส!

R, 46 ไบต์

g=function(x)ifelse(x!="google",nchar(x),)

โพสต์ดั้งเดิมไม่เคยระบุว่ารหัสจะต้องมีรูปแบบที่ถูกต้องเว้นแต่ว่าฉันกำลังอ่านผิด

ตัวอย่าง:

> g("bing")
[1] 4
> g("google")
Error in ifelse(x != "google", nchar(x), ) : 
  argument "no" is missing, with no default

ฉันไม่เคยเพิ่มอะไรสำหรับพารามิเตอร์ "no" ของคำสั่ง ifelse ดังนั้นมันจะส่งคืนข้อผิดพลาดหากพารามิเตอร์นี้ปรากฏขึ้น

Perl, 31 29 ไบต์

sub{$_=pop;y///c/!/^google$/}

-2b ต้องขอบคุณการจัดการ

การใช้งาน:

sub{$_=pop;y///c/!/^google$/}->("google")

ถ้าฉันสามารถออกไปกับโปรแกรมมากกว่าฟังก์ชั่นต่อไปนี้จะใช้ได้กับ 20 ไบต์เท่านั้น (บรรทัดคำสั่ง +1 ไบต์)

$_=y///c/!/^google$/

ข้อผิดพลาดคือการหารด้วยศูนย์

คำอธิบาย:

y///cส่งคืนความยาวจากนั้น!/^google$/จะส่งคืน 0 iff ที่ตรงกับ 'google'

การใช้งาน:

perl -p entry.pl input.txt

Haskell - 30 ตัวอักษร

g"google"=error"!";g s=length s

>g "google"
 *Exception: !
>g "str"
 3

Python 3, 35 ไบต์

lambda n:len(n)if n!='google'else d

Java 7: 53 52 ไบต์

int g(String _){return"google"==_?0/0:_.length();} 

รหัสข้างต้นจะโยนArithmeticExceptionสำหรับหารด้วยศูนย์และสำหรับการใด ๆStringอื่น ๆ googleกว่า ควรทราบว่า==เปรียบเทียบการอ้างอิงและจะไม่ทำงานกับStringวัตถุ

Java 8: 29 ไบต์

(ตามข้อเสนอแนะที่ให้ไว้ในความคิดเห็นด้านล่าง)

s->s=="google"?0/0:s.length()

C ++ 11, 54 (รหัส) + 14 (#include) = 68

การหารด้วยศูนย์เป็นเพียงพฤติกรรมที่ไม่ได้กำหนดซึ่งฉันจะไม่เรียกข้อผิดพลาด ดังนั้นวิธีการของฉัน

#include<ios>
[](std::string s){return s!="google"?s.size():throw;};

การใช้

[](std::string s){return s!="google"?s.size():throw;}("google");

MUMPS ขนาด 28 ไบต์

g(s) q $S(s'="google":$L(s))

การใช้งาน:

>w $$g^MYROUTINE("bing")                                      
4
>w $$g^MYROUTINE("google")

<SELECT>g^MYROUTINE

ทำไม? ดี$S[ELECT]เป็นพื้นขนาดกะทัดรัดหลายประโยคถ้า-อื่นงบ - เกือบจะเหมือนรูปแบบการแข่งขันในภาษาเช่น Haskell หรือสนิม ยกเว้น ... ไม่เหมือนใน Haskell หรือ Rust รูปแบบจะไม่ถูกตรวจสอบว่าหมดแรงเพราะแนวคิดของ "ความปลอดภัยเวลารวบรวม" นั้นต่างจาก MUMPS อย่างสมบูรณ์ ดังนั้นหากใส่ของคุณเป็นรูปแบบที่คุณไม่ได้บัญชีสำหรับคุณจะได้รับข้อผิดพลาด runtime <SELECT>น่ารักที่เรียกว่า

ทับทิม, 34 30 27 26

->x{x=='google'?t: x.size}

ไม่รู้จักtยกข้อยกเว้น

->x{x=='google'?fail():x.size}

แก้ไข: รุ่นที่สามารถอ่านได้และชัดเจนซึ่งสั้นกว่า ...

->x{x[x=~/^(?!google$)/..-1].size}

เก่า: ค่อนข้างคล้ายกับแนวคิดอื่น ๆ ที่ดูเหมือน จะเพิ่มArgumentErrorหาก x คือ 'google'

จาวาสคริปต์, 47 ไบต์

ดีและเรียบง่าย

แก้ไข:ตอนนี้สอดคล้องกับกฎ

function f(g){if(g=="google")a;return g.length}

การทดสอบ

เกิดข้อผิดพลาด

function f(g){if(g=="google")a;return g.length}

alert(f("Hello"))
alert(f("google"))
alert(f("hi"))

ไม่มีข้อผิดพลาดเกิดขึ้น

function f(g){if(g=="google")a;return g.length}

alert(f("Hello"))
alert(f("bing"))
alert(f("hi"))

C, 66 48

เดิม:

int l(long*s){return strlen(s)/((*s&~(-1L<<56))!=0x656c676f6f67);}

ใช้ OSX gcc,
l("duck");ผลตอบแทน4, สาเหตุ
l("google");Floating point exception: 8

บนแพลตฟอร์มอื่นค่าคงที่อาจต้องมีการปรับเพื่อ endianness

สั้น :

ความยุ่งยากน้อยกว่าผลลัพธ์เดียวกัน

 l(int*s){return strlen(s)/!!strcmp(s,"Google");}

Ruby, 29 ไบต์

ฉันมาครั้งแรกกับสิ่งที่คล้ายกับความพยายามครั้งแรกของ @ Borsunho แต่ของฉันก็ยาวขึ้นเล็กน้อยและเขาโพสต์เขาก่อนที่ฉันจะเสร็จ มากับสิ่งนี้ก่อนที่เขาจะแก้ไข 30 ไบต์ :)

->s{s[/^(?!google$).*/].size}

ตัวอย่างการใช้งาน:

$ irb
2.2.1 :001 > f = ->s{s[/^(?!google$).*/].size}
 => #<Proc:0x007fa0ea03eb60@(irb):1 (lambda)> 
2.2.1 :002 > f[""]
 => 0 
2.2.1 :003 > f["bing"]
 => 4 
2.2.1 :004 > f["google"]
NoMethodError: undefined method `size' for nil:NilClass
  from (irb):1:in `block in irb_binding'
  from (irb):4:in `[]'
  from (irb):4
  from /Users/daniel/.rvm/rubies/ruby-2.2.1/bin/irb:11:in `<main>'

Ruby , 25 ไบต์

->s{+s[/^(?!google$).*/]}

แทนที่String#sizeด้วยเครื่องหมายบวกใหม่ ลองออนไลน์!

> <>, 55 ไบต์

i:0(?v
31&l~<v0"google"~~.?%2l
$v?(2l<S?*=2l=6:+={
&<;n

คิดว่าฉันจะเลิกเล่นเกมนี้ไม่ใช่ความพยายามหรืออัลกอริทึมที่ดีที่สุดของฉัน ไม่ใช่ฟังก์ชั่นต่อ se แต่ฉันคิดว่ามันควรจะมีคุณสมบัติ ฉันจะดูว่าฉันสามารถแก้ไขในรุ่นที่ดีกว่า

หากคุณได้รับอนุญาตให้พิมพ์ความยาวและข้อผิดพลาดต่อไปนี้เป็นวิธีการแก้ปัญหา 46 ไบต์:

i:0(?v
2lnl~<v0"google";?%
$;?(2l<S?*=2l=6:+={

วิธีแก้ปัญหาก่อนหน้านี้ 49 ไบต์ในลักษณะนี้:

i:0(?v
l0nl~<v;!?=7
:;?(2l<S?*=2l=6:+=@@g3
elgoog

ฉันยินดีที่จะอธิบายหากมีสิ่งใดสนใจและโปรดแจ้งให้เราทราบว่ามีอะไรผิดปกติกับคำตอบของฉันหรือถ้าคุณมีคำแนะนำในการเล่นกอล์ฟ

Javascript ES6, 51 27 25 ไบต์

สวัสดีฉันยังใหม่กับการตีกอล์ฟดังนั้นนี่อาจจะเป็นกอล์ฟมากกว่านี้ แต่ที่นี่จะไป:

_=>_=="google"?a:_.length

g=_=>_=="google"?a:_.length

g=_=>{if("google"==_)throw Error();return _.length}

และการทดสอบบางอย่าง:

(_=>_=="google"?a:_.length)("bing")//4
(_=>_=="google"?a:_.length)("google")// Error: a is not defined

g("bing")// returns 4
g("google")// Error: a is not defined

แก้ไข: เพิ่มแล้ว? เพื่อแทนที่ถ้าและแทนที่ข้อผิดพลาดด้วยวัตถุที่ไม่ได้กำหนด

แก้ไข 2: ฉันรู้ว่าจำนวนไบต์ของฉันผิดและลบ g =

GolfScript, 14 16 ตัวละคร

{.,\'google'=!/}

เช่นเดียวกับคนอื่น ๆ เพียงแค่เปรียบเทียบอินพุต'google'และหารความยาวโดยอินเวอร์สของผลลัพธ์

โปรแกรมตัวอย่าง:

• ด้วย'bing' (เอาท์พุท: 4)
• ด้วย'google' (เอาต์พุต: ข้อผิดพลาด: พยายามหารด้วยศูนย์ )

ติดอยู่ 16 ไบต์

s_l1u"google"=-/

การทำตามวิธีการที่คล้ายกันกับคนส่วนใหญ่จะทำให้เกิดข้อผิดพลาด 0 โดยแบ่งเป็น "google"

Windows Batch 118 ตัว

IF /I "%string%"=="google" exit
echo %string%> string.txt
for %%? in (string.txt) do ( SET /A stringlength=%%~z? - 2 )

ผลผลิตคือ% stringlength%

รหัสเต็ม:

@echo off
del string.txt
cls
echo Type your string
echo.
set /p string=String:
IF /I "%string%"=="google" goto err
echo %string%> string.txt
for %%? in (string.txt) do ( SET /A stringlength=%%~z? - 2 )
cls
echo %stringlength%
pause
del string.txt
:err
color c
echo There seems to be an error with your input...
pause>nul

ดัดแปลงจากคำตอบของโจชัว Honig ของที่นี่