Convertissez le format de date courte en date longue en anglais en aussi peu d'octets que possible.

Contribution

L'entrée sera sous la forme d'une chaîne de format yyyy-mm-dd, avec un remplissage nul en option pour toutes les valeurs. Vous pouvez supposer que c'est syntaxiquement correct, mais pas nécessairement une date valide. Les valeurs d'année négatives n'ont pas besoin d'être prises en charge.

Production

Vous devez convertir la date au format anglais de date longue (par exemple 14th February 2017). Le remplissage nul ici n'est pas autorisé.

Si la date n'est pas valide (par exemple 2011-02-29), cela doit être reconnu d'une manière ou d'une autre. Le lancement d'une exception est autorisé.

Plus d'exemples peuvent être vus ci-dessous.

Cas de test

"1980-05-12" -> 12th May 1980
"2005-12-3"  -> 3rd December 2005
"150-4-21"   -> 21st April 150
"2011-2-29"  -> (error/invalid)
"1999-10-35" -> (error/invalid)

PostgreSQL, 61 caractères

prepare f(date)as select to_char($1,'fmDDth fmMonth fmYYYY');

Instruction préparée, prend l'entrée comme paramètre.

Exemple d'exécution:

Tuples only is on.
Output format is unaligned.
psql (9.6.3, server 9.4.8)
Type "help" for help.

psql=# prepare f(date)as select to_char($1,'fmDDth fmMonth fmYYYY');
PREPARE

psql=# execute f('1980-05-12');
12th May 1980

psql=# execute f('2005-12-3');
3rd December 2005

psql=# execute f('150-4-21');
21st April 150

psql=# execute f('2011-2-29');
ERROR:  date/time field value out of range: "2011-2-29"
LINE 1: execute f('2011-2-29');
                  ^
psql=# execute f('1999-10-35');
ERROR:  date/time field value out of range: "1999-10-35"
LINE 1: execute f('1999-10-35');
                  ^
HINT:  Perhaps you need a different "datestyle" setting.

Python 3.6, 137 129 octets

from datetime import*
def f(k):g=[*map(int,k.split('-'))];n=g[2];return f"{date(*g):%-d{'tsnrhtdd'[n%5*(n^15>4>n%10)::4]} %B %Y}"

Essayez-le en ligne!

JavaScript (ES6), 142 140 octets

Sorties NaNth Invalid Datepour des dates non valides.

Le code des nombres ordinaux a été adapté de cette réponse .

d=>`${s=(D=new Date(d)).getDate()+''}${[,'st','nd','rd'][s.match`1?.$`]||'th'} `+D.toLocaleDateString('en-GB',{month:'long',year:'numeric'})

f=
d=>`${s=(D=new Date(d)).getDate()+''}${[,'st','nd','rd'][s.match`1?.$`]||'th'} `+D.toLocaleDateString('en-GB',{month:'long',year:'numeric'})

console.log(
  f('2005-12-3'),
  f('1980-05-12'),
  f('2005-12-3'),
  f('150-4-21'),
  f('2011-2-29'),
  f('1999-10-35')
)

Python 3.6 , 154 octets

from datetime import*
s=[*map(int,input().split('-'))]
b=s[2]
print(date(*s).strftime(f"%-d{'th'if(3<b<21)+(23<b<31)else('st','nd','rd')[b%10-1]} %B %Y"))

Essayez-le en ligne! (Définissez le flux d'entrée, puis exécutez.)

Merci aux bonnes suggestions des commentateurs ci-dessous.

PHP, 87 octets

<?=checkdate(($a=explode("-",$argn))[1],$a[2],$a[0])?date("jS F Y",strtotime($argn)):E;

Exécuter en tant que pipe avec -Fou tester en ligne . Imprime toujours une année à 4 chiffres; échoue pendant des années> 9999.

pas de contrôle de validité, 35 octets:

<?=date("jS F Y",strtotime($argn));

Bash + coreutils, 115 78

• 2 octets enregistrés grâce à @manatwork.

d="date -d$1 +%-e"
t=`$d`
f=thstndrd
$d"${f:t/10-1?t%10<4?t%10*2:0:0:2} %B %Y"

Essayez-le en ligne .

C #, 147 143 octets

s=>{var t=System.DateTime.Parse(s);int d=t.Day,o=d%10;return d+((d/10)%10==1?"th":o==1?"st":o==2?"nd":o==3?"rd":"th")+t.ToString(" MMMM yyy");}

4 octets enregistrés grâce à @The_Lone_Devil.

mIRC version 7.49 (197 octets)

//tokenize 45 2-2-2 | say $iif($3 isnum 1- $iif($2 = 2,$iif(4 // $1 && 25 \\ $1||16//$1,29,28),$iif($or($2,6) isin 615,30,31))&&$2 isnum1-12&&1//$1,$asctime($ctime($+($1,-,$2,-,$3)date), doo mmmm yyyy))

Ruby , 104 103 102 + 8 = 112 111 110 octets

Utilise -rdate -ples indicateurs de programme.

-1 octet de manatwork.

sub(/.*-(\d*)/){Date.parse($&).strftime"%-d#{d=eval$1;(d<4||d>20)&&"..stndrd"[d%10*2,2]||:th} %B %-Y"}

Essayez-le en ligne!

C # (.NET Core) , 167 197 octets

s=>s.Equals(DateTime.MinValue)?"":s.Day+((s.Day%10==1&s.Day!=11)?"st":(s.Day%10==2&s.Day!=12)?"nd":(s.Day%10==3&s.Day!=13)?"rd":"th")+" "+s.ToString("MMMM")+" "+s.Year

Essayez-le en ligne!

+30 octets pour

using System;

DateTime.Parse()

Excel, 212 octets

=ABS(RIGHT(A1,2))&IF(ABS(ABS(RIGHT(A1,2))-12)<2,"th",SWITCH(RIGHT(A1,1),"1","st","2","nd","3","rd","th"))&TEXT(MID(A1,FIND("-",A1)+1,FIND("-",REPLACE(A1,1,FIND("-",A1),""))-1)*30," mmmm ")&LEFT(A1,FIND("-",A1)-1)

Si vous le divisez en morceaux à chaque esperluette, vous obtenez ces pièces:

• ABS()extrait le numéro du jour des deux derniers caractères de la chaîne. Comme cela peut inclure un trait d'union, le ABSconvertit en positif.
• IF((ABS-12)<2,"th",SWITCH())ajoute l'ordinal. Le -12bit est parce que 11, 12 et 13 ne suivent pas la règle normale et ils obtiennent tous thau lieu de st,nd et rd. Cela corrige cela.
  • Remarque: La SWITCHfonction est uniquement disponible dans Excel 2016 et versions ultérieures. ( Source ) Il est plus court que CHOOSEdans ce cas car il peut renvoyer une valeur si aucune correspondance n'est trouvée alors qu'il CHOOSEnécessite une entrée numérique et doit avoir un retour correspondant pour chaque valeur possible.
• TEXT(MID()*30," mmmm ")extrait le nom du mois. MID()extrait le numéro du mois sous forme de chaîne et multiplier par 30 renvoie un nombre. Excel voit ce nombre comme une date _{^{(1900-01-30, 1900-02-29, 1900-03-30, etc.)}} et le TEXT()formate comme un nom de mois avec un espace aux deux extrémités. 28 et 29 auraient également fonctionné mais 30 semble "plus joli".
• LEFT() extrait le numéro de l'année.

Maintenant, étant donné tout cela, il aurait été beaucoup plus facile si les cas de test se trouvaient tous dans une plage de dates qu'Excel peut gérer comme une date réelle: 1900-01-01 à 9999-12-31. Le gros avantage est que la date entière est formatée à la fois. Cette solution est de 133 octets :

=TEXT(DATEVALUE(A1),"d""" & IF(ABS(ABS(RIGHT(A1,2))-12)<2,"th",SWITCH(RIGHT(A1,1),"1","st","2","nd","3","rd","th")) & """ mmmm yyyy")

L'autre grand obstacle devait inclure l'ordinal. Sans cela, la solution ne fait que 34 octets :

=TEXT(DATEVALUE(A1),"d mmmm yyyy")

Swift 3: 298 octets

let d=DateFormatter()
d.dateFormat="yyyy-MM-dd"
if let m=d.date(from:"1999-10-3"){let n=NumberFormatter()
n.numberStyle = .ordinal
let s=n.string(from:NSNumber(value:Calendar.current.component(.day, from:m)))
d.dateFormat="MMMM YYY"
print("\(s!) \(d.string(from:m))")}else{print("(error/invalid)")}

Essayez-le en ligne!

T-SQL, 194 octets

DECLARE @ DATE;SELECT @=PARSE('00'+i AS DATE)FROM t;PRINT DATENAME(d,@)+CASE WHEN DAY(@)IN(1,21,31)THEN'st'WHEN DAY(@)IN(2,22)THEN'nd'WHEN DAY(@)IN(3,23)THEN'rd'ELSE'th'END+FORMAT(@,' MMMM yyy')

L'entrée se fait via la colonne de texte i dans le tableau préexistant t , selon nos normes IO .

Fonctionne pour les dates du 1er janvier 0001 au 31 décembre 9999. L'année est sortie avec au moins 3 chiffres (par exemple 150AD).

Des dates non valides entraîneront l'erreur laide suivante:

Error converting string value 'foo' into data type date using culture ''.

Différents paramètres de langue / culture par défaut peuvent modifier ce comportement. Si vous voulez une sortie d'erreur légèrement plus gracieuse (NULL), ajoutez 4 octets en changeant PARSE()en TRY_PARSE().

Format et explication:

DECLARE @ DATE;
SELECT @=PARSE('00'+i AS DATE)FROM t;
PRINT DATENAME(d,@) + 
    CASE WHEN DAY(@) IN (1,21,31) THEN 'st'
         WHEN DAY(@) IN (2,22)    THEN 'nd'
         WHEN DAY(@) IN (3,23)    THEN 'rd'
         ELSE 'th' END
    + FORMAT(@, ' MMMM yyy')

Le DATEtype de données introduit dans SQL 2008 permet une plage beaucoup plus large que DATETIME, du 1er janvier 0001 au 31 décembre 9999.

Certaines dates très précoces peuvent être mal analysées avec mes paramètres de localité aux États-Unis (le "01-02-03" devient le "2 janvier 2003"), j'ai donc ajouté quelques zéros supplémentaires pour qu'il sache que la première valeur est l'année.

Après cela, c'est juste une CASEdéclaration désordonnée pour ajouter le suffixe ordinal à la journée. De façon ennuyeuse, la FORMATcommande SQL n'a aucun moyen de le faire automatiquement.

q / kdb + 210 octets, non concurrents

Solution:

f:{a:"I"$"-"vs x;if[(12<a 1)|31<d:a 2;:0];" "sv(raze($)d,$[d in 1 21 31;`st;d in 2 22;`nd;d in 3 23;`rd;`th];$:[``January`February`March`April`May`June`July`August`September`October`November`December]a 1;($)a 0)};

Exemples:

q)f "2017-08-03"
"3rd August 2017"
q)f "1980-05-12"
"12th May 1980"
q)f "2005-12-3"
"3rd December 2005"
q)f "150-4-21" 
"21st April 150"
q)f "2011-2-29"       / yes it's wrong :(
"29th February 2011"
q)f "1999-10-35"
0

Explication:

C'est un défi horrible car il n'y a pas de formatage de date, donc je dois créer des mois à partir de zéro (95 octets) ainsi que générer le suffixe.

La solution non golfée est ci-dessous, divise essentiellement la chaîne d'entrée, puis se réunit à nouveau après avoir ajouté le suffixe et changé le mois.

f:{
   // split input on "-", cast to integers, save as variable a
   a:"I"$ "-" vs x;
   // if a[1] (month) > 12 or a[2] (day) > 31 return 0; note: save day in variable d for later
   if[(12<a 1) | 31<d:a 2;
     :0];
   // joins the list on " " (like " ".join(...) in python)
   " " sv (
           // the day with suffix
           raze string d,$[d in 1 21 31;`st;d in 2 22;`nd;d in 3 23;`rd;`th];
           // index into a of months, start with 0 as null, to mimic 1-indexing
           string[``January`February`March`April`May`June`July`August`September`October`November`December]a 1;
           // the year cast back to a string (removes any leading zeroes)
           string a 0)
  };

Remarques:

Les dates en q ne remontent qu'à ~ 1709, donc je n'ai pas de moyen trivial de valider la date, donc c'est une entrée non concurrente ... Le mieux que je puisse faire est de vérifier si le jour est> 31 ou le mois est > 12 et retournez 0.