La verdad es que es mu sencillo hacerlo "a mano"
Veamos: octal = base 8 y por tanto se dividen en grupos de 3 los
permisos de un fichero:
rwx------ = 700
^^^
||--- 001
|---- 010
----- 100
------
111 (binario) = 7 decimal
Un script podr�a hacer algo as�... a ver lo estoy probando... s�:
(me ha llevado un ratillo...)
#!/usr/bin/perl
while (<STDIN>)
{
$total=0;
$orden=1;
chomp;
$linea=$_;
while ( $trozo=substr($linea,-3)){
print "My trozo es $trozo\n";
if ($trozo =~/^r../) { $total=$total+4*$orden; }
if ($trozo =~/^.w./) { $total=$total+2*$orden; }
if ($trozo =~/^..x/) { $total=$total+1*$orden; }
# Le quitamos el trozo
$linea=substr($linea,0,-3); $orden=$orden*10;
}
print "El permiso vale en octal: $total\n";
}
exit 0;
Creo que funciona en todos los casos... aunque no lo he probado
mucho (lo suficiente para saber que funciona)... si quieres explicaciones de
c�mo funciona p�delas...
Javi
On Tue, Jan 19, 1999 at 02:36:58AM +0100, Vicente Barba wrote:
> Me pregunto si hay alguna forma (por comando o script) de saber que
> permisos en forma octal tiene un archivo.
>
> Gracias.
> --
> Vicente Barba <[EMAIL PROTECTED]> -- Albacete [ES]
> 100% LiNUX: http://personal1.iddeo.es/ret003u7
> Debian GNU/Linux -- Usuario Registrado # 90822
>
>
> --
> Unsubscribe? mail -s unsubscribe [EMAIL PROTECTED] < /dev/null
>
