Le but de ce code-golf est de créer un code qui permet à l'utilisateur de saisir une chaîne ASCII (ne contient que des caractères ASCII imprimables ), et votre programme sort la variante minuscule de cette chaîne.

Important: vous n'êtes PAS autorisé à utiliser une fonction intégrée qui convertit la chaîne (ou un seul caractère) en minuscules (comme ToLower()en .NET, strtolower()en PHP, ...)! Vous êtes toutefois autorisé à utiliser toutes les autres fonctions intégrées.

Autre remarque importante: la chaîne d'entrée ne contient pas que des caractères majuscules. La chaîne d'entrée est un mélange de caractères majuscules, de caractères minuscules, de chiffres et d'autres caractères imprimables ASCII .

Bonne chance!

Coquille - 10

Traduction de la solution Perl de @ Gowtham à l'aide de /bin/tr.

tr A-Z a-z

Exemple d'exécution:

% tr A-Z a-z <<<'Hello WORLD! @'
hello world! @

Python 2.7 - 30 (avec un abus de règle terrible et sans excuse)

raw_input().upper().swapcase()

Comme l'a souligné une modification anonyme, vous pouvez le faire dans 2726 en Python 3 :

input().upper().swapcase()

J'abuse de manière flagrante des règles ici, mais ...

Important: vous n'êtes PAS autorisé à utiliser une fonction intégrée qui convertit la chaîne (ou un seul caractère) en minuscules (comme ToLower()en .NET, strtolower()en PHP, ...)! Vous êtes toutefois autorisé à utiliser toutes les autres fonctions intégrées.

Cela prend les cordes et les couvre en majuscules . Ensuite, dans un appel de méthode très indépendant, il inverse la casse de la chaîne - de sorte que toutes les lettres minuscules deviennent des lettres majuscules ... et permute toutes les lettres majuscules en lettres minuscules .

Perl - 11 10 caractères.

y/A-Z/a-z/

y///c'est pareil tr///!

En action:

% perl -pe 'y/A-Z/a-z/' <<< 'Hello @ WORLD !'
hello @ world !

Befunge-98 - 26 22 21 19

~:''-d2*/1-!' *+,#@

S'appuie sur le fait que ce (c-39)/26n'est 1que pour les codes de caractères de caractères ASCII majuscules (en supposant une division entière). Pour chaque caractère c, imprimez c + (((c-39)/26)==1)*' '.

Exemple de session:

% cfunge lower.b98
hello WORLD!
hello world!
This is a TEST!!11 az AZ @[`{
this is a test!!11 az az @[`{

Python 3, 58

print("".join(chr(ord(x)+('@'<x<'[')*32)for x in input()))

Ruby, 18 caractères

Rien de vraiment intéressant.

gets.tr'A-Z','a-z'

(exécuté en IRB)

Juste pour le plaisir: une version déroutante:

$,=$* *' ';$;=$,.tr'A-Z','a-z';$><<$;

Courez comme ceci:

c:\a\ruby>lowercase.rb Llamas are AMAZING!

Sortie

llamas are amazing!

J - 30

'@Z'(]+32*1=I.)&.(a.&i.)1!:1]1

J est lu de droite à gauche, donc pour décomposer ceci:

1. Inviter l'utilisateur à entrer: 1!:1]1
2. Effectuer l'algorithme dans l'espace de point de code: &.(a.&i.)
3. Identifiez la plage de caractères pour chaque lettre; les caractères entre codepoints « @ » et « Z » sont considérés comme des majuscules: 1=I..
4. Pour chaque point de code majuscule, ajoutez 32: ]+32* ...
5. Notez que l'étape (2) crée une étape implicite (5): nous avons commencé par projeter du caractère au domaine entier, alors maintenant que nous avons terminé, nous mappons ces nombres entiers sur des caractères.

De toute évidence, cette implémentation particulière ne prend en compte que l'ASCII; mais l'approche pourrait être étendue au moins au plan multilingue de base en Unicode.

C 64 63 59 55 caractères

main(c){while(c=getchar(),~c)putchar(c-65u<27?c+32:c);}

Golfscript - 17

Programme:

{..64>\91<*32*+}%

Explication:

1. {}% mappe le code à l'intérieur à chaque caractère de la chaîne.
2. .. copie deux fois le haut de la pile (le personnage).
3. 64> 1 si le code de caractère est supérieur à 64, sinon 0.
4. \échange les deux éléments de la pile (obtient la deuxième copie de la lettre et stocke le résultat de la 64>position deux).
5. 91< vérifie si le code de caractère est inférieur à 91. Similaire à l'étape 3.
6. *multiplie les résultats des étapes 3 et 5 ensemble. Seulement égal à 1, si les deux étapes étaient vraies.
7. 32* multiplie le résultat de l'étape 6 par 32. Sera 32 si l'étape 6 était 1, sinon 0.
8. + ajoutez le résultat (32 ou 0) au code de caractère.

Exemple de sortie:

echo HelLO @ WorLD | ruby golfscript.rb upper_to_lower.gs
hello @ world

Perl: 24 caractères

s/[A-Z]/chr 32+ord$&/ge

Exemple d'exécution:

bash-4.1$ perl -pe 's/[A-Z]/chr 32+ord$&/ge' <<< 'Hello @ WORLD !'
hello @ world !

Python (33)

En cas de doute, utilisez le shell.

import os;os.system('tr A-Z a-z')

Malheureusement, c'est encore plus long que la solution de Lego.

DELPHES

const
  UpChars:set of AnsiChar = ['A'..'Z'];
var
  I: Integer;
begin
  SetLength(Result, Length(pString));
  for I := 1 to length(pstring) do
    Result[i] := AnsiChar((Integer(pString[i] in UpChars))*(Ord(pString[i])+32));
  WriteLn(Result);
end;

JavaScript - 109 104 (ES6: 95)

Merci à certains pour la version corrigée.

a=prompt();for(b=[i=0];c=a.charCodeAt(i);)b[i++]=String.fromCharCode(c|(c>64&c<91)*32);alert(b.join(""))

Ce qui suit fonctionne si le navigateur prend en charge les expressions de fonction ES6:

alert(prompt().split("").map(c=>String.fromCharCode(c.charCodeAt()|(c>"@"&c<"[")*32)).join(""))

Perl 18

s/[A-Z]/$&|" "/eg

Quelque chose comme:

perl -pe 's/[A-Z]/$&|" "/eg'  <<<'are NOT allowed to: ToLower() in .NET, strtolower() in PHP'
are not allowed to: tolower() in .net, strtolower() in php

et

perl -pe 's/[A-Z]/$&|" "/eg' <<< "The input string Doesn't cOntaIn...( C0D3-@01F. ;-)"
the input string doesn't contain...( c0d3-@01f. ;-)

Pour @FireFly :

perl -pe 's/[A-Z]/$&|" "/eg' <<< "Doesn't this translate @ to \` and [\]^_ to {|}~DEL? "
doesn't ... @ to ` and [\]^_ to {|}~del? 

non.

Plus générique: 18 caractères quand même:

s/[A-Z]/$&|" "/eg

s/[A-Z]/$&^" "/eg

Cela ne changera rien dans l'état:

perl -pe 's/[A-Z]/$&^" "/eg' <<< "Doesn't ... @ to \` and [\]^_ to {|}~DEL? "
doesn't ... @ to ` and [\]^_ to {|}~del? 

Tout fonctionne bien, mais l'avantage de changer |(ou) par ^(xor) est que la même syntaxe pourrait être utilisée pour toLower, toUpperou swapCase:

toUpper:

perl -pe 's/[a-z]/$&^" "/eg' <<< "Doesn't ... @ to \` and [\]^_ to {|}~DEL? "
DOESN'T ... @ TO ` AND [\]^_ TO {|}~DEL? 

et swapCase (18 + 1 = 19 caractères) :

perl -pe 's/[a-z]/$&^" "/egi' <<< "Doesn't ... @ to \` and [\]^_ to {|}~DEL? "
dOESN'T ... @ TO ` AND [\]^_ TO {|}~del? 

javascript 80

"X".replace(/[A-Z]/g,function($){return String.fromCharCode($.charCodeAt()+32)})

(76 si vous supprimez "X")

avec promptet alert- 92

alert(prompt().replace(/[A-Z]/g,function($){return String.fromCharCode($.charCodeAt()+32)}))

violon

merci à @FireFly @some @ C5H8NNaO4 et @minitech

R

71 caractères:

chartr(paste(LETTERS,collapse=""),paste(letters,collapse=""),scan(,""))

83 caractères:

a=as.integer(charToRaw(scan(,"")))
b=a%in%(65:90)
a[b]=a[b]+32
rawToChar(as.raw(a))

Q, 18

.....

{x^ssr/[x]..Q`a`A}

Q (16)

.......

{x^(.Q.A!.Q.a)x}

PHP (42)

Exécutez à partir de la ligne de commande:

-R'echo@str_ireplace($a=range(a,z),$a,$argn);'

-R et les guillemets simples ne sont pas comptés.

PowerShell: 69 65 64

J'ai essayé une demi-douzaine de façons de faire en sorte que Replace fonctionne comme je le souhaite sans utiliser la longue [regex]::Replacesyntaxe, mais je n'ai pas eu de chance. Si quelqu'un d'autre a une idée de ce qui pourrait fonctionner, veuillez le suggérer.

Code golf:

[regex]::Replace((read-host),"[A-Z]",{[char](32+[char]"$args")})

Changements par rapport à l'original:

• Réorganisé le dernier argument pour qu'il [int]ne soit plus nécessaire, selon la suggestion dans les commentaires.

Explication:

(read-host) obtient l'entrée utilisateur.

[regex]::Replace(... )indique à PowerShell d'utiliser la correspondance RegEx pour effectuer des opérations de remplacement sur une chaîne.

"[A-Z]" correspond à toutes les lettres majuscules.

{... }indique à PowerShell d'utiliser un script pour déterminer la valeur de remplacement.

[char]"$args" prend la correspondance actuelle et la tape sous forme de caractère ASCII.

32+ convertit le caractère en un entier, représentant le code ASCII, et augmente la valeur de 32 - ce qui correspondrait au code ASCII de la lettre minuscule correspondante.

[char](... )prend la valeur résultante et la reconvertit en caractère ASCII.

Démo de l'original:

(Version actuelle testée - capture d'écran non encore publiée.)

k2, 15 octets

Je suis super en retard sur celui-ci, mais j'ai quand même trouvé ça cool.

{_ci 32+_ic x}'

Également:

Pyth, 10 octets

Ne compte pas vraiment car Pyth a été créé après sa publication. Toujours cool.

jkmC+32Cdw

05AB1E , 3 octets

u.š

Port de @ user8777 réponse Python 3 .

Essayez-le en ligne.

Explication:

u    # Convert the (implicit) input to uppercase
 .š  # Switch the case (upper to lower and vice-versa)
     # (and output the result implicitly)

Mais sans aucune modification de casse:

05AB1E , 12 11 octets

ÇIS.u32*+çJ

-1 octet grâce à @Emigna .

Essayez-le en ligne.

Explication:

Ç            # Get the unicode values of each character of the (implicit) input-String
 IS          # Get the input-string, split to characters again
   .u        # Check for each if it's uppercase or not (1 if truthy; 0 if falsey)
     32*     # Multiply that result by 32 (32 if truhy; 0 if falsey)
        +    # Add it to all the unicode values at the same indices in the list
         ç   # Convert the now modified unicode values back to characters
          J  # And join all characters together to a string again
             # (which is output implicitly as result)

Javascript, 105

prompt().split("").map(function(a){c=a.charCodeAt(0);return String.fromCharCode(c|(c-64?32:0))}).join("")

_{En fait, aucun formulaire de sortie n'était spécifié, alors exécutez-le dans la console Oui, JavaScript est vraiment détaillé avec la chaîne charcode <->}

Rubis: 66

def l(s)s.bytes.map{|b|(65..90).include?(b)?b+32:b}.pack('c*');end

C # - 108

class P{static void Main(string[]a){foreach(var c in a[0])System.Console.Write(
(char)(c>64&&c<91?c+32:c));}}

Environ 70 pour juste le corps de la méthode.

Ajoutez 5 caractères pour inclure un LF / CR dans la sortie:

class P{static void Main(string[]a){foreach(var c in a[0]+"\n")System.Console.Write(
(char)(c>64&&c<91?c+32:c));}}

Une version LINQ serait plus courte:

class P{static void Main(string[]a){a[0].Any(c=>System.Console.Write(
(char)(c>64&&c<91?32+c:c))is P);}}

(103) .. sauf qu'il l'exige using System.Linq;(total: 121).

Haskell - 58

p x|(elem x['A'..'Z'])=[x..]!!32|1<2=x
main=interact$map p

Python 3-70

Mis à jour pour les changements d'OP.

Je suis un débutant en Python, donc toute critique est la bienvenue.

print("".join(chr(ord(c)+32) if 64<ord(c)<91 else c for c in input()))

Perl, 9 + 1 (pour le drapeau -p) = 10

$_="\L$_"

\L a été spécifiquement interrogé et autorisé, car même s'il s'agit d'une fonction intégrée, ce n'est pas une fonction.

Powershell, 53 49 octets

-4 octets merci @AdmBorkBork

-join($args|% t*y|%{[char](32*($_-in65..90)+$_)})

Script de test:

$f = {

-join($args|% t*y|%{[char](32*($_-in65..90)+$_)})

}

@(
    ,("Hello WORLD from PowerShell", "hello world from powershell")
) | % {
    $a,$e = $_
    $r = &$f $a
    "$($r-eq$e): $r"
}

Sortie:

True: hello world from powershell

8086 code machine, 14 octets

Assemblé:

AC 3C 41 7C 06 3C 5A 7F 02 0C 20 AA E2 F2

Liste non assemblée:

 ; Lowercase a string
 ; Input: string: SI, length: CX
 ; Output: string: DI
 TOLOW  MACRO   
        LOCAL _LOOP, _STORE
       _LOOP:
 AC         LODSB           ; load byte from [SI] into AL, advance SI 
 3C 41      CMP  AL, 'A'    ; is char less than 'A'? 
 7C 06      JL   _STORE     ; if so, do not convert 
 3C 5A      CMP  AL, 'Z'    ; is char greater than 'Z'? 
 7F 02      JG   _STORE     ; if so, do not convert 
 0C 20      OR   AL, 020H   ; lowercase the char 
       _STORE:
 AA         STOSB           ; store char to [DI], advance DI 
 E2 F2      LOOP _LOOP      ; continue loop through string 

Mis en œuvre en tant que MACRO(essentiellement une fonction). Chaîne d'entrée en SI, longueur en CX. Chaîne de sortie dansDI .

Sortie du programme de test PC DOS:

Téléchargez et testez l' exemple de programme TOLOW.COM .