atributy souboru

[Honza Pazdziora]

On Thu, Apr 04, 2002 at 08:31:04AM +0200, Marek wrote:
> Ahoj vsichni, muze mi nekdo rict co delam spatne. Snazim se prochazet 
> adresarem po jednotlivych souborech jakmile najdu ten spravny tak mu chci 
> nastavit atributy ale nejde to.

Ocekavana otazka: co znamena to "nejde to"? Provede se to die, nebo?
Nebo Vam to zbootuje pocitac?

> mam to tak
> 
> $dir = POSIX::opendir("/programo/adresar/");
> foreach (POSIX::readdir($dir)){
> next if ($_ eq '.' or $_ eq '..');
> if ($_ eq $user){
> 	my $k="chmod 0600 $_";
> 	system($k) == 0 or die "problem s chmod $?";
> 	last;
> 	}

Jeste si jist, ze jste v tom samem adresari, ktery prochazite? Pokud
ne, tak si peclive promyslete, co mate v $_. A jste si jist, ze chcete
volat system, kdyz presne to same je mozno udelat primo funkci
v perlu, navic bez bezpecnostnich problemu, ktere Vam prinasi pouziti
system s jednim parametrem?

-- 
------------------------------------------------------------------------
 Honza Pazdziora | adelton na fi.muni.cz | http://www.fi.muni.cz/~adelton/
      ... all of these signs saying sorry but we're closed ...
------------------------------------------------------------------------