Всі ми знаємо, що якщо ви перейдете на слово "google", це порушить Інтернет.

Ваше завдання - створити функцію, яка приймає один рядок і повертає його довжину, з найменших символів Unicode.

Однак, якщо даний рядок google(малий), це призведе до помилки.

Наприклад, g('bing')повернеться, 4але g('google')призведе до помилки.

Надайте приклад використання та, якщо можливо, помилка.

Пітон 2, 29

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

Дає ZeroDivisionErrorна "google", а довжину в іншому випадку. Це використовує переваги буленів Python, що дорівнює 0і 1.

Excel, 23 символи

Вставте це в іншу клітинку, ніж A1, і введіть пошуковий запит в A1.

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

Наприклад:

C #, 43 байти

Поліпшення щодо відповіді Салама Аламі. Повторне викидання виключення переповнення стека при наданні "google"

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

Піта, 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 байт

Дякую Тому Карпентеру за гоління 1 байта!

Дякуємо Стіві Гріффін за бриття 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 байт

Дякую Тому Карпентеру за гоління 1 байта!

Дякуємо Стіві Гріффін за бриття 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

Увімкнено ReferenceError Δдля Google.

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

TI-BASIC, 15 байт

Хек, поки ми в цьому , можемо також отримати TI-BASIC відповідь.

Формат вводу є "string":prgmNAME. Кредит Томас Ква для знаходження його першим!

length(Ans)+log(Ans≠"GOOGLE

(Посібник: додайте 1 байт для кожної малої літери, замінюючи великі регістри. Отже s/GOOGLE/google/g => +6 bytes.)

ааааа, тестові випадки!

"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 байти

Я знаю, що він довший за рішення Матлаба (яке також працювало б в Октаві), але це особливо зле. Я створюю анонімну функцію (злий), використовуючи масив комірок (злий) літерал (злий), що містить ручки функції, залежні від функції зворотного виклику (сама, таким чином, рекурсивна, зла), яка повинна передаватися через аргумент. Потім я створюю ще один анонім, який в основному зводить функцію до аргументу рядка і фіксує другий аргумент fяк f(дуже злий). Будь-яка розумна людина ніколи цього не зробить, тому що це майже так само нечитабельно, як Perl або регулярний вираз (або cjam / pyth / будь-який інший езоланг).

Отже, якщо рядок не є "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

Я ніколи нічого не додавав до параметра "ні" у операторі 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Об'єктів.

Ява 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");

МУМПА, 28 байт

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

Використання:

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

<SELECT>g^MYROUTINE

Чому? Ну, $S[ELECT]це в основному компактний багатозакласний висловлювання if-else - майже як збіг шаблонів на такій мові, як Haskell або Rust. За винятком ... на відміну від Haskell або Rust, шаблони не перевіряються на вичерпність, оскільки поняття "безпека часу компіляції" абсолютно чуже MUMPS. Отже, якщо ваш вхід - це шаблон, який ви не брали до уваги, ви отримуєте чудову помилку виконання <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".

JavaScript, 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.

На інших платформах константи, можливо, потребуватимуть коригування на витривалість.

Коротше :

менша хитрість, ті ж результати.

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

Рубін, 29 байт

Я спершу придумав щось дуже схоже на першу спробу @ Борсунго, але моя була трохи довшою, і він розмістив його ще до того, як я закінчив. Придумав це до редагування його 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>'

Рубін , 25 байт

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

Замінено String#sizeновим одинарним плюсом. Спробуйте в Інтернеті!

> <>, 55 байт

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

Думав, я б хотів це піти, не моя найкраща спроба чи алгоритм з гольфу. Сама по собі не функція, але я думаю, що це все одно має бути кваліфікованим. Я побачу, чи зможу я редагувати в кращій версії.

Якщо вам дозволено друкувати довжину, а потім помилку, ось 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, 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

Змінено з відповіді Джошуа Хоніга тут .