Portál AbcLinuxu, 30. dubna 2025 16:20
Predchvíľou som zažil mierne stresovú situáciu, za ktorú sa ani náhodou nehanbím, lebo sa môže stať kľudne hocikomu :)
Kolegyňa sa vydávala a ako to už býva zvykom, zmena mena bola nevyhnutná. Z toho vyplýva aj zmena mailovej schránky a podobne. Hneď som sa teda s chuťou pustil do vytvárania nového konta, presúvania súborov v /home medzi kontami, až kým som neprišiel k zmene vlastníckych práv. Jedna hviezdička hore-dole a dokáže to narobiť peknú paseku v podobe celého /home adresára, ktorý vlastní jedna osoba (a nie je to root ). Päť sekúnd po tomto osudovom momente sa rozzvonil telefón a ja som jednou rukou vysvetľoval ľuďom cez telefón, že maily nepôjdu asi 10 minút a druhou rukou som už písal perlovský skript, ktorý to všetko opraví.
#!/usr/bin/perl -w use strict; my $subor; my $prikaz; opendir(DIR,"/home"); while (defined($subor = readdir(DIR))) { $prikaz="chown -R ".$subor.":".$subor." /home/".$subor."/\n"; system($prikaz); }
Čo z toho vypláva? Dvakrát meraj a raz rež a nikdy nechoď do práce s chuťou, lebo sa ti to vypomstí. A nehanbím sa za to, že som urobil chybu, učím sa aj na vlastných chybách. Chyba bola tak či tak vyriešená za 10 minút.
Tiskni
Sdílej:
$ cd /home; for i in *; do chown -R $i.$i $i; done
xargs
?
ISSN 1214-1267, (c) 1999-2007 Stickfish s.r.o.