sslug-teknik team mailing list archive

[Peter Makholm <peter@xxxxxxxxxxx>]

Peter Makholm <peter@xxxxxxxxxxx> writes:

Ok, sæt lige to linjer ind:

> #!/usr/bin/perl 
> 
> while(<>) {
>  my @info = split /:/;
   unless (-e $info[5]) {
>  mkdir $info[5], 755;
>  chown $info[2], $info[3], @info[5];
   }
> }

Så skulle Erwins problemer være løst, men ellers er det en sød ide han
selv kommer med med at genererer et script, man så selv lige kan se
efter.


(Kan jeg undskylde mig med at jeg opfyldte kravspecifikationen
100%. tilretning af kravsspecifikationen koster det dobelte)

-- 
hash-bang-slash-bin-slash-bash