Re: perl controlling samba permissions?
From: Ben Morrow (usenet_at_morrow.me.uk)
Date: 02/19/04
- Next message: Scottie: "Re: Newbe Unicode question"
- Previous message: Ben Morrow: "Re: PerlSAX"
- In reply to: Anthony Boyd: "perl controlling samba permissions?"
- Next in thread: Anthony Boyd: "Re: perl controlling samba permissions?"
- Reply: Anthony Boyd: "Re: perl controlling samba permissions?"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Date: Thu, 19 Feb 2004 19:20:22 +0000 (UTC)
usenet@outshine.com (Anthony Boyd) wrote:
> I have a Linux box that is going to share a directory via Samba.
> People will be authorized to use the share via LDAP. They may change
> the file permissions (on the Samba/Windows side, but the Linux
> permissions should remain unchanged).
>
> I wanted to have a PHP script read the Samba permissions set on each
> file, and display that via a Web page. PHP doesn't appear up to the
> task (but it can get/set Linux permissions OK).
>
> Can Perl handle this? I thought Filesys::SmbClient might work, but
> the docs imply Linux permissions can be changed, not the Windows side.
I don't think the two sets of permissions are distinct...
Ben
--
$.=1;*g=sub{print@_};sub r($$\$){my($w,$x,$y)=@_;for(keys%$x){/main/&&next;*p=$
$x{$_};/(\w)::$/&&(r($w.$1,$x.$_,$y),next);$y eq\$p&&&g("$w$_")}};sub t{for(@_)
{$f&&($_||&g(" "));$f=1;r"","::",$_;$_&&&g(chr(0012))}};t # ben@morrow.me.uk
$J::u::s::t, $a::n::o::t::h::e::r, $P::e::r::l, $h::a::c::k::e::r, $.
- Next message: Scottie: "Re: Newbe Unicode question"
- Previous message: Ben Morrow: "Re: PerlSAX"
- In reply to: Anthony Boyd: "perl controlling samba permissions?"
- Next in thread: Anthony Boyd: "Re: perl controlling samba permissions?"
- Reply: Anthony Boyd: "Re: perl controlling samba permissions?"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Relevant Pages
|
|