Le quatrième jour avant les Nones de février, en réponse à F. Senault :
> je suis partisan de la solution crade

Ah !
J'arrive alors !


> Si tu veux sélectionner par exemple un tiers de tes articles (ce qui,
> chez moi, avec une période de rétention de trois mois fait à peu près un
> mois), tu peux faire ça en perl :
>
> perl -ne 'next unless /^fr\./; \
> split; \
> $t = int(($_[2] - $_[1]) / 3 + $_[1]); \
> print "$_[0] $t\n"' /news/db/active

Bon, je me lance :

awk '/^fr\./ {printf "%s %d\n", $1, ($3-$2)/3 + $2}' /news/db/active


Qui dit mieux ?

--
Iulius

« Qui prête à rire n'est jamais sûr d'être remboursé. » (Raymond Devos)