Kita semua tahu bahwa jika Anda google kata "google" itu akan merusak internet.

Tugas Anda adalah membuat fungsi yang menerima satu string dan mengembalikan panjangnya, dengan karakter Unicode yang sesedikit mungkin.

Namun, jika string yang diberikan adalah google(huruf kecil), itu akan menyebabkan kesalahan.

Misalnya, g('bing')akan kembali 4tetapi g('google')akan menyebabkan kesalahan.

Harap berikan contoh penggunaan, dan kesalahan jika memungkinkan.

Python 2, 29

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

Memberi ZeroDivisionErroron "google", dan panjangnya sebaliknya. Ini mengambil keuntungan dari menyamakan boolean Python 0dan 1.

Excel, 23 karakter

Rekatkan ini ke sel selain A1 dan ketik permintaan pencarian Anda ke A1.

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

Sebagai contoh:

C #, 43 byte

Peningkatan atas jawaban Salah Alami. Berulang-ulang untuk melempar pengecualian stack overflow pada penyediaan "google"

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

Pyth, 14 13 karakter

L/lbnb"google

Menentukan fungsi bernama y.

Ini membagi panjang dengan 1 jika string bukan google dan 0 sebaliknya. Idenya bukan novel, tetapi saya memunculkannya secara mandiri.

Cobalah online.

Bagaimana itu bekerja

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 byte

Terima kasih kepada Tom Carpenter karena telah menghemat 1 byte!

Terima kasih kepada Stewie Griffin karena mencukur 2 byte!

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

Berbeda dengan solusi lain yang lebih elegan, melakukan operasi pembagian dengan nol di MATLAB tidak akan memberikan kesalahan, melainkan Inf. Solusi ini menemukan panjang string nnz. String yang dihasilkan sedemikian rupa sehingga Anda mengindeks dari awal string ke akhir, yang pada dasarnya adalah salinan dari string. Namun, yang penting adalah bahwa awal dari mana mengakses string dihasilkan dengan memeriksa apakah input sama atau tidak 'google'. Jika tidak, ini menghasilkan indeks awal 1 dan kami indeks ke dalam string secara normal ... karena MATLAB mulai mengindeks pada 1. Jika sama, indeks yang dihasilkan adalah 0 dan MATLAB akan melempar kesalahan pengindeksan yang menyatakan bahwa indeks harus bilangan bulat positif. Ekstra+adalah untuk memastikan bahwa output dari pemeriksaan kesetaraan adalah numerik daripada Boolean / logical. Menghilangkan +kehendak akan menghasilkan peringatan, tetapi karena spesifikasi tantangan ini tidak memungkinkan untuk peringatan, +diperlukan ... dengan demikian melengkapi kode.

Penggunaan contoh

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

Versi yang lebih menyenangkan, 83 77 76 74 72 byte

Terima kasih kepada Tom Carpenter karena telah menghemat 1 byte!

Terima kasih kepada Stewie Griffin karena mencukur 2 byte!

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

Di atas bukan pengajuan resmi, tapi itu sesuatu yang sedikit lebih menyenangkan untuk dijalankan. Menyalahgunakan evaldalam fungsi anonim, yang dilakukan kode adalah memeriksa untuk melihat apakah string input sama dengan 'google'... dan jika ya, ini akan membuka browser web bawaan MATLAB dan menunjukkan halaman kesalahan 404 Google yang mencoba mengakses Subhalaman terletak pada isaat itu tidak ada. Jika tidak, kami menampilkan panjang string secara normal.

Penggunaan contoh

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

ans =

     4

>> f('google')
>> 

Panggilan terakhir menggunakan 'google'memberi kita layar ini:

JavaScript ES6, 34 27 25 karakter

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

Lempar ReferensiError Δke Google.

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

TI-BASIC, 15 byte

Heck, sementara kita berada di sana , mungkin juga mendapatkan jawaban TI-BASIC di sini.

Format input adalah "string":prgmNAME. Penghargaan untuk Thomas Kwa karena menemukannya pertama kali!

length(Ans)+log(Ans≠"GOOGLE

(Panduan: tambahkan 1 byte untuk setiap huruf kecil menggantikan huruf besar. Jadi s/GOOGLE/google/g => +6 bytes.)

uji kasus ahhhhh!

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

APL (14)

(⍴÷'google'∘≢)

Penjelasan:

• ⍴: panjangnya
• ÷: dibagi dengan
• 'google∘≢: argumen tidak sama dengan 'google'.

⍴memberikan panjang string, yang dibagi dengan 1 jika string tidak sama google(yang memberikan panjang kembali tidak berubah), atau dengan 0 jika string tidak sama google(memberikan kesalahan).

Python 3, 30 byte

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

Mengindeks daftar fungsi 1-elemen, menaikkan IndexErrorjika u=='google'predikatnya adalah True(= 1). Fungsional seperti itu.

Banyak varian. Wow:

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

Jika tantangannya terbalik (kesalahan pada semuanya bukan "google"), dapat menyimpan char:

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

Tapi Anda sudah tahu panjangnya, jadi hardcode saja.

Haskell, 24 byte

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

Keluaran:

Main> g "google"

Program error: pattern match failure: g "google"

Main> g "bing"
4

CJam, 16 karakter

{_,\"google"=!/}

Ini membagi panjang dengan 1 jika string bukan google dan 0 sebaliknya. Idenya bukan novel, tetapi saya memunculkannya secara mandiri.

Cobalah online.

Bagaimana itu bekerja

_                 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.

Oktaf, 63 byte

Saya tahu ini lebih lama dari solusi Matlab (yang akan bekerja di oktaf juga), tetapi itu sangat jahat. Saya membuat fungsi anonim (jahat) menggunakan array sel (jahat) literal (jahat) yang berisi fungsi menangani tergantung pada fungsi callback (itu sendiri, sehingga rekursif, jahat) yang harus dilewatkan melalui argumen. Lalu saya membuat anonim lain yang pada dasarnya mengurangi fungsi argumen string dan memperbaiki argumen kedua fsebagai f(sangat jahat). Setiap manusia waras tidak akan pernah melakukan ini, karena hampir tidak dapat dibaca seperti Perl atau regex (atau cjam / pyth / esolang lainnya).

Jadi jika string bukan 'google' argumen kedua dari array sel akan dipanggil yang menampilkan panjang string. Kalau tidak, fungsi pertama akan dipanggil, yang dilewatkan sebagai callback (dan melewati dirinya sebagai callback ke dirinya sendiri juga) yang kemudian adalah fungsi itu sendiri. Kesalahan pada dasarnya adalah beberapa kesalahan kedalaman rekursi maksimum.

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

JavaScript, 25 Bytes

Contoh JavaScript yang bagus dan sederhana:

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

Jika "google" dimasukkan maka melewati a ReferenceError

Contoh

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

APL, 19 17 byte

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

Ini adalah fungsi monadik tanpa nama yang akan menimbulkan kesalahan sintaksis jika inputnya adalah google. Ini dicapai dengan berusaha mengambil logaritma natural dari ketiadaan.

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

Cobalah online

Disimpan dua byte berkat Dennis!

R, 46 byte

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

Kecuali saya salah membaca, posting asli tidak pernah menentukan bahwa kode tersebut harus sintaks yang benar.

Contoh:

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

Saya tidak pernah menambahkan apa pun untuk parameter "tidak" dari pernyataan ifelse sehingga akan mengembalikan kesalahan jika parameter ini ditimbulkan.

Perl, 31 29 byte

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

-2b terima kasih kepada manatwork

Pemakaian:

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

Jika saya bisa pergi dengan program daripada fungsi, berikut ini akan valid dengan hanya 20 byte (baris perintah +1 byte)

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

Kesalahan adalah pembagian dengan nol.

Penjelasan:

y///cmengembalikan panjangnya, lalu !/^google$/akan mengembalikan 0 jika input cocok dengan 'google'.

Pemakaian:

perl -p entry.pl input.txt

Haskell - 30 karakter

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

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

Python 3, 35 byte

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

Java 7: 53 52 Bytes

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

Kode di atas akan membuang ArithmeticExceptionuntuk pembagian dengan nol dan Stringselain dari google. Patut dicatat bahwa ==membandingkan referensi dan tidak akan berfungsi untuk StringObjek.

Java 8: 29 Bytes

(Berdasarkan saran yang diberikan dalam komentar di bawah)

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

C ++ 11, 54 (kode) + 14 (# termasuk) = 68

Nah, pembagian dengan nol hanyalah perilaku yang tidak terdefinisi, yang saya tidak akan menyebut kesalahan. Jadi pendekatan saya.

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

pemakaian

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

MUMPS, 28 byte

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

Pemakaian:

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

<SELECT>g^MYROUTINE

Mengapa? Yah, $S[ELECT]pada dasarnya adalah pernyataan multi-klausa ringkas jika ada - hampir seperti pencocokan pola dalam bahasa seperti Haskell atau Rust. Kecuali ... tidak seperti di Haskell atau Rust, polanya tidak diperiksa untuk kelengkapannya, karena gagasan "keamanan waktu kompilasi" sama sekali asing bagi MUMPS. Jadi jika input Anda adalah pola yang tidak Anda pertanggungjawabkan, Anda akan mendapatkan error runtime yang bagus <SELECT>.

Ruby, 34 30 27 26

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

Tidak dikenal tmemunculkan pengecualian.

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

Sunting: versi yang benar-benar mudah dibaca dan jelas yang lebih pendek ...

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

Lama: Sepertinya mirip dengan ide-ide lain. Akan naik ArgumentErrorjika x adalah 'google'.

JavaScript, 47 byte

Bagus dan sederhana.

Sunting: Sekarang mematuhi aturan

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

Pengujian

Kesalahan terlempar

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

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

Tidak ada kesalahan yang terjadi

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

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

C, 66 48

Asli:

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

Menggunakan OSX gcc,
l("duck");mengembalikan 4,
l("google");menyebabkan Floating point exception: 8.

Pada platform lain, konstanta mungkin perlu disesuaikan untuk endianness.

Lebih pendek :

kurang rumit, hasil yang sama.

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

Ruby, 29 byte

Saya pertama kali datang dengan sesuatu yang sangat mirip dengan upaya pertama @ Borsunho, tetapi milik saya sedikit lebih lama dan dia mempostingnya sebelum saya selesai. Datang dengan ini sebelum 30 byte editnya :)

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

Contoh penggunaan:

$ 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 byte

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

Digantikan String#sizedengan plus unary baru. Cobalah online!

> <>, 55 byte

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

Kupikir aku akan mencobanya, bukan upaya atau algoritme golf terbaikku. Bukan fungsi per se, tapi saya pikir ini masih memenuhi syarat. Saya akan melihat apakah saya dapat mengedit dalam versi yang lebih baik.

Jika Anda diizinkan untuk mencetak panjang dan kemudian kesalahan, inilah solusi 46 byte:

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

49 byte solusi sebelumnya dari sifat ini:

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

Saya senang memberikan penjelasan jika ada minat, dan beri tahu saya jika ada yang salah dengan jawaban saya atau jika Anda memiliki saran bermain golf.

Javascript ES6, 51 27 25 byte

Hai, saya baru mengenal kode golf jadi ini mungkin bisa lebih banyak golf, tapi begini saja:

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

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

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

dan beberapa tes:

(_=>_=="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

Edit: Ditambahkan? untuk mengganti jika dan mengganti Kesalahan dengan objek yang tidak ditentukan.

Sunting 2: Saya menyadari jumlah byte saya salah, dan menghapus g =

GolfScript, 14 16 Karakter

{.,\'google'=!/}

Seperti banyak yang lain, cukup bandingkan input 'google'dan bagi panjangnya dengan kebalikan dari hasilnya.

Contoh program:

• Dengan'bing' (output: 4)
• Dengan'google' (output: Kesalahan: Berusaha membagi dengan nol. )

Terjebak , 16 Bytes

s_l1u"google"=-/

Mengikuti metode yang mirip dengan kebanyakan orang, akan menyebabkan kesalahan pembagian 0 pada "google" sebagai input.

Windows Batch, 118 karakter

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

Output adalah% stringlength%.

Kode lengkap:

@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

Dimodifikasi dari jawaban Joshua Honig, di sini .