Мы все знаем, что если вы Google Google слово «Google», это сломает Интернет.

Ваша задача - создать функцию, которая принимает одну строку и возвращает ее длину в наименьшем количестве символов Unicode.

Однако, если заданная строка google(строчная), это приведет к ошибке.

Например, g('bing')вернется, 4но g('google')вызовет ошибку.

Пожалуйста, предоставьте пример использования и ошибку, если это возможно.

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

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

Спасибо Тому Карпентеру за то, что он сбрил 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 байта

Спасибо Тому Карпентеру за то, что он сбрил 1 байт!

Спасибо Stewie Griffin за то, что он сбрил 2 байта!

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

Вышеуказанное не является официальным представлением, но в нем немного веселее. Злоупотребление evalвнутри анонимных функций, код выполняет то, что проверяет, равна ли входная строка'google' ... и если это так, то это открывает встроенный веб-браузер MATLAB и показывает страницу ошибки Google 404, пытающуюся получить доступ к подстраница, расположенная там, 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

Выдает ошибку ReferenceE Δдля 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 байта

Я знаю, что это дольше, чем решение 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», то он проходит 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$/}

-2б благодаря манатворке

Использование:

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

Если бы я мог сойти с рук с помощью программы, а не функции, следующее было бы допустимо только с 20 байтами (+1 байт командной строки)

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

Ошибка деление на ноль.

Объяснение:

y///cвозвращает длину, а затем !/^google$/вернет 0, если входные совпадения "Google".

Использование:

perl -p entry.pl input.txt

Хаскель - 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]по сути, это компактный оператор 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если х "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"))

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

Сначала я придумал что-то очень похожее на первую попытку @ 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>'

Рубин , 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

Редактировать: Добавлено? заменить if и заменить Error неопределенным объектом.

Редактировать 2: я понял, что мой счетчик байтов был неправильным, и удалил g =

GolfScript, 14 16 символов

{.,\'google'=!/}

Как и многие другие, просто сравнивает входные данные 'google'и делит длину на обратную величину результата.

Примеры программ:

• С'bing' (выход: 4)
• С'google' (выход: ошибка: попытка деления на ноль. )

Застрял , 16 байт

s_l1u"google"=-/

Следуя аналогичному методу для большинства людей, при вводе "google" возникнет ошибка деления на 0.

Пакет Windows, 118 символов

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

Вывод% длины строки%.

Полный код:

@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

Модифицировано из ответа Джошуа Хонига здесь .