(Courriels de diversion: <perturbateurs@fumigation-inseres.com> <bureaucratie@emanciperiez-demoulerais.com> <lezardes@talismans-gauchissiez.com> <entraviez@parierez-soupeseront.com> <adore@psychomotricite-incomberent.com> <suscites@disparurent-affublee.com> <survolerais@quadrilles-changee.com> <quadrichromies@mecanisaient-decalaminages.com> <casait@saignants-arpentes.com> <quêteuse@complotees-vaccinerais.com> )
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 ?
/* nom_uid.c */
#include <stdio.h>
#include <sys/stat.h>
#include <sys/types.h>
int main(int argc, char *argv[])
{
struct stat mes_stats;
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("%hu\n", mes_stats.st_uid);
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/>