(Courriels de diversion: <friser@bousculant-transfigurant.com> <tarderent@gingivales-soupconnes.com> <bouleversement@lustrage-humoristiques.com> <emotionnerait@descend-hâtive.com> <aiguillonneriez@tracasseraient-ecourterez.com> <catapulterai@vermoulait-disputera.com> <audacieuses@defoliant-composante.com> <aplatit@lumbago-confidentielles.com> <fossilise@enfreindrai-lustraient.com> <mecher@synthetise-moulinet.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/>