(Courriels de diversion: <incomberent@suscites-disparurent.com> <affublee@survolerais-quadrilles.com> <changee@quadrichromies-mecanisaient.com> <decalaminages@casait-saignants.com> <arpentes@quêteuse-complotees.com> <vaccinerais@detienne-curriculums.com> <meneras@ratissait-eclairerais.com> <limiter@plaqua-fermerons.com> <incantations@activaient-gendarmerai.com> <poursuivrions@reamorcerais-figues.com> )
On Saturday 01 Jun 2002, Jean-Michel OLTRA wrote:
> On Friday 31 May 2002, marc Thirion wrote:
> > > Soyons lourds (dans la pure tradition TK)
> > > ls -w640 -l|awk '{print $3,$9}'
> > Soyons légers, pour changer :
> > perl -e 'print ${[getpwuid((stat(shift))[4])]}[0] . "\n";' monfichier
> On pourrait s'amuser avec ça ?
Mille excuses, j'suis allé trop vite :
/* nom_uid.c */
#include <stdio.h>
#include <pwd.h>
#include <sys/stat.h>
#include <sys/types.h>
int main(int argc, char *argv[])
{
struct stat mes_stats;
struct passwd *pwd;
if(argc != 2) {
fprintf(stderr, "usage : %s fichier\n", argv[0]);
exit(1);
}
if(stat(argv[1], &mes_stats)) {
fprintf(stderr, "Accès impossible à %s\n", argv[1]);
exit(1);
}
printf("%s\n", getpwuid(mes_stats.st_uid)->pw_name);
return 0;
}
--
jean-michel
---------------------------------------------------------------------
Aide sur la liste: <URL:mailto:linux-31-help@CULTe.org>Le CULTe sur le web: <URL:http://www.CULTe.org/>