Portál AbcLinuxu, 31. října 2025 05:07
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í.
 ). 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.