Hepimiz biliyoruz ki "google" kelimesini google kelimesiyle google interneti kırarsanız.

Göreviniz bir dize kabul eden ve uzunluğunu döndüren, en az Unicode karakterli bir işlev oluşturmaktır.

Ancak, verilen dize google(küçük harf) ise, bir hataya neden olur.

Örneğin, g('bing')geri dönecek, 4ancak g('google')bir hataya neden olacaktır.

Lütfen bir kullanım örneği ve mümkünse hatayı sağlayın.

Python 2, 29

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

Aksi halde ZeroDivisionErroraçık "google"ve uzunluk verir . Bu, Python'un eşit 0ve eşit olan boolerlerinden yararlanır 1.

Excel, 23 karakter

Bunu A1 dışındaki bir hücreye yapıştırın ve arama sorgunuzu A1'e yazın.

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

Örneğin:

C #, 43 bayt

Salah Alami'nin cevabında bir gelişme. "Google" sağlama konusuna yığın taşması istisnası atma isteği

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

Pyth, 14 13 karakter

L/lbnb"google

Adlandırılmış bir işlevi tanımlar y.

Bu dize google değilse ve aksi takdirde 0'a kadar uzunluğu 1'e böler . Fikir yeni değil, ama bağımsız olarak anladım.

Çevrimiçi deneyin.

Nasıl çalışır

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 bayt

1 byte'ı tıraş ettiğin için Tom Carpenter'a teşekkürler!

Stewie Griffin'e 2 byte'ı tıraş ettiğin için teşekkürler!

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

Diğer daha zarif çözümlerin aksine, MATLAB'da sıfıra bölerek işlem yapmak hata vermeyecek, aksine Inf. Bu çözüm dizenin uzunluğunu bulur nnz. Üretilen dize, dizenin başından sonuna kadar indeksleyeceğiniz şekildedir, bu temel olarak dizenin bir kopyasıdır. Bununla birlikte, önemli olan, dizeye erişilecek yerin başlangıcının girdinin eşit olup olmadığını kontrol ederek üretilmesidir 'google'. Olmazsa, bu 1'in başlangıç ​​indeksini üretir ve normalde dizgiye indeksleriz ... MATLAB 1'de indekslemeye başlar. Eşit olursa, üretilen indeks 0'dır ve MATLAB indeksleme hatası atacağını belirtir. endeks pozitif bir tamsayı olmalıdır. Ekstra+eşitlik kontrolünün çıktısının Boolean / 'dan ziyade sayısal olmasını sağlamaktır logical. İsteği atlamak +bir uyarı üretecektir, ancak bu zorluğun özellikleri uyarılara izin vermediğinden +, gerekli olan ... kodun tamamlanması.

Örnek kullanımlar

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

Daha eğlenceli bir versiyon, 83 77 76 74 72 bytes

1 byte'ı tıraş ettiğin için Tom Carpenter'a teşekkürler!

Stewie Griffin'e 2 byte'ı tıraş ettiğin için teşekkürler!

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

Yukarıdakiler resmi bir sunum değil, fakat çalıştırılması biraz daha eğlenceli bir şey. evalAnonim işlevler kötüye kullanıldığında , kodun yaptığı şey, giriş dizesinin eşit olup olmadığını kontrol etmektir 'google'... ve öyleyse, bu MATLAB'ın yerleşik web tarayıcısını açar ve Google'ın 404 hata sayfasını erişmeye çalışırken gösterir ivar olmadığı zaman bulunan alt sayfa . Değilse, normal olarak dizenin uzunluğunu gösteririz.

Örnek kullanımlar

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

ans =

     4

>> f('google')
>> 

Son kullanılan çağrı 'google'bize şu ekranı verir:

JavaScript ES6, 34 27 25 karakter

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

ΔGoogle için ReferenceError'ı fırlatır .

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

TI-BASIC, 15 bayt

Heck, biz varken , burada bir TI-BASIC cevabı da alabiliriz.

Giriş formatı "string":prgmNAME. Kredi Thomas Kwa önce onu bulmak için!

length(Ans)+log(Ans≠"GOOGLE

(Kılavuz: bir büyük harf yerine, her küçük harf için 1 bayt ekleyin s/GOOGLE/google/g => +6 bytes.)

ahhhhh test durumları!

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

APL (14)

(⍴÷'google'∘≢)

Açıklama:

• ⍴: uzunluk
• ÷: bölü
• 'google∘≢: tartışma eşit değil 'google'.

⍴dize eşit değil ise 1 ile bölünür dize uzunluğunu veren google(arka değişmeden uzunluğu verir), ya da 0 ile dize, etmez eşit google(bir hata verir).

Python 3, 30 bayt

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

1 elemanlı işlev listesini indeksler, IndexErroreğer bir şayet (= 1) ise bir u=='google'sayı atar True. Böyle işlevsel.

Çok değişkenler. Vay:

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

Eğer zorluk tersine çevrildiyse ( "google" olmayan her şeyde hata ) bir karakter kaydedebilir:

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

Ama zaten uzunluğu biliyorsunuz, bu yüzden sadece kodlayın.

Haskell, 24 bayt

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

Çıktı:

Main> g "google"

Program error: pattern match failure: g "google"

Main> g "bing"
4

CJam, 16 karakter

{_,\"google"=!/}

Bu dize google değilse ve aksi takdirde 0'a kadar uzunluğu 1'e böler . Fikir yeni değil, ama bağımsız olarak anladım.

Çevrimiçi deneyin.

Nasıl çalışır

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

Octave, 63 bayt

Matlab çözümünden daha uzun olduğunu biliyorum (ki bunlar da Octave'de işe yarayacaktı), ama özellikle de kötülük. Argümanla iletilmesi gereken bir geriçağırım işlevine (işlev, özyinelemeli, özyinelemeli, kötülük) bağlı olan işlev tutamaçlarını içeren hücre dizisi (kötülük) değişmezleri (kötülük) kullanarak adsız bir işlev (kötülük) yapıyorum. Sonra temel olarak işlevi string argümanına indirgeyen ve fas argümanını as f(çok kötü) olarak düzelten başka bir isimsiz isim oluşturuyorum . Aklı başında herhangi bir insan bunu asla yapmaz, çünkü neredeyse Perl veya regex (veya cjam / pyth / diğer esolang) kadar okunmazdır.

Dize 'google' değilse, dizinin uzunluğunu çıkaran hücre dizisinin ikinci argümanı çağrılır. Aksi halde, bir geri çağırma olarak geçen (ve kendisini de geri çağırma olarak da geçiren) ilk işlev çağrılır; bu, daha sonra işlevin kendisidir. Hata temelde bazı maksimum özyineleme derinliği hatasıdır.

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

JavaScript, 25 Bayt

Güzel ve basit JavaScript örneği:

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

"Google" girilirse, mesaj geçilir ReferenceError

Örnek

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

APL, 19 17 bayt

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

Bu, eğer girdi ise, sözdizimi hatası atacak isimsiz bir monadik fonksiyondur google. Bu, hiçbir şeyin doğal logaritmasını almaya çalışmakla gerçekleştirilir.

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

Çevrimiçi deneyin

Dennis sayesinde iki bayt kurtarıldı!

R, 46 bayt

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

Yanlış okuduğum sürece, orijinal yayın hiçbir zaman kodun doğru sözdizimi olması gerektiğini belirtmedi.

Örnek:

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

İfelse deyiminin "no" parametresi için hiçbir şey eklemedim, bu nedenle bu parametre uyarıldıysa bir hata döndürür.

Perl, 31 29 bayt

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

-2b insan yapımı sayesinde

Kullanımı:

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

İşlev yerine bir programdan kurtulabilseydim, aşağıdakiler yalnızca 20 bayt (+1 bayt komut satırı) ile geçerli olur.

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

Hata sıfıra bölünür.

Açıklama:

y///cuzunluğu döndürür, sonra !/^google$/girdi "google" ile eşleşirse 0 değerini döndürür.

Kullanımı:

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 bayt

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

Java 7: 53 52 Bayt

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

Yukarıdaki kod ArithmeticExceptionsıfıra ve Stringdiğerlerinden birine bölünmeye başlayacaktır google. Başvuruyu ==karşılaştırdığına ve StringNesneler için işe yaramayacağına dikkat etmeye değer .

Java 8: 29 Bayt

(Aşağıdaki yorumda verilen önerilere dayanarak)

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

C ++ 11, 54 (kod) + 14 (#include) = 68

Eh, sıfıra bölmek sadece tanımsız bir davranış, bu bir hata demez. Yani benim yaklaşımım.

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

kullanım

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

MUMPS, 28 bayt

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

Kullanımı:

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

<SELECT>g^MYROUTINE

Neden? Eh, $S[ELECT]temelde kompakt bir çok-cümle if-else ifadesidir - neredeyse Haskell veya Rust gibi bir dilde örüntü eşleşmesi gibidir. Bunun dışında ... Haskell veya Rust'taki gibi, modeller "ayrıntılı derleme zamanı" kavramı NUMPS'a tamamen yabancı olduğundan, yorulma kontrolleri yapılmadı. Yani girişiniz hesaba katmadığınız bir kalıpsa, adında hoş bir çalışma zamanı hatası alırsınız <SELECT>.

Ruby, 34 30 27 26

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

Bilinmeyen tistisna yaratır.

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

Düzenleme: tamamen okunabilir ve daha kısa olan açık bir sürüm ...

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

Eski: Göründüğü gibi diğer fikirlere oldukça benzer. ArgumentErrorX 'google' ise yükseltecektir .

JavaScript, 47 bayt

Güzel ve basit.

Düzenleme: Şimdi kurallara uyuyor

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

Test yapmak

Atılan hata

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

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

Hata atılmadı

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

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

C, 66 48

Orijinal:

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

OSX gcc kullanarak,
l("duck");döndürür 4,
l("google");neden olur Floating point exception: 8.

Diğer platformlarda sabitlerin endianness için ayarlanması gerekebilir.

Daha kısa :

daha az hünersizlik, aynı sonuçlar.

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

Ruby, 29 bayt

İlk önce @ Borsunho'nun ilk girişimine çok benzeyen bir şey buldum, ancak benimki biraz daha uzundu ve ben yapmadan önce onu gönderdi. 30 baytlık düzenlemeden önce bununla geldi :)

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

Kullanım örnekleri:

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

Yakut , 25 bayt

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

String#sizeYeni unary plus ile değiştirildi . Çevrimiçi deneyin!

> <>, 55 bayt

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

Yine de, en iyisi golf denememe ya da algoritmaya değil, buna bir şans vereceğimi düşündüm. Kendi başına bir işlev değil, ama bunun hala kalifiye olması gerektiğini düşünüyorum. Daha iyi bir versiyonda düzenleme yapıp yapamayacağımı göreceğim.

Uzunluğu ve ardından hatayı yazdırmanıza izin verilirse, 46 baytlık bir çözüm:

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

49 byte bu nitelikteki önceki çözüm:

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

Herhangi bir ilgi varsa bir açıklama yapmaktan mutluluk duyuyorum ve lütfen cevabımda yanlış bir şey varsa veya golf önerileri varsa lütfen bana bildirin.

Javascript ES6, 51 27 25 bayt

Merhaba, golf kodlaması yeniyim, bu yüzden muhtemelen daha fazla golf oynayabilirsin, ama işte burada:

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

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

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

ve bazı testler:

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

Düzenleme: Eklendi? if'in yerini alır ve yerine tanımlanmamış bir nesneyle değiştirir.

Düzenleme 2: Bayt sayımın yanlış olduğunu anladım ve g = kaldırıldı

GolfScript, 14 16 Karakterler

{.,\'google'=!/}

Diğerleri gibi, girişi de karşılaştırır 'google've uzunluğu sonucun tersine böler.

Örnek programlar:

• İle'bing' (çıkış: 4)
• İle'google' (çıkış: Hata: Sıfırla bölmeye çalışıldı. )

Sıkışmış , 16 Bayt

s_l1u"google"=-/

Çoğu kişi için benzer bir yöntem izleyerek, "google" girişi sırasında 0 hatası ile bölmeye neden olur.

Windows Toplu İş, 118 karakter

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

Çıktı% stringlength% 'dir.

Tam kod:

@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

Joshua Honig'in cevabından değiştirildi, burada .