Lchown

Lchown(3)	     User Contributed Perl Documentation	    Lchown(3)



NAME
       Lchown - use the lchown(2) system call from Perl

SYNOPSIS
	 use Lchown;

	 lchown $uid, $gid, ’foo’ or die "lchown: $!";

	 my $count = lchown $uid, $gid, @filenames;

	 # or

	 use Lchown qw(lchown LCHOWN_AVAILABLE);

	 warn "this system lacks the lchown system call\n" unless LCHOWN_AVAILABLE;

	 ...

	 # or

	 use Lchown ();

	 warn "this won’t work\n" unless Lchown::LCHOWN_AVAILABLE;
	 Lchown::lchown $uid, $gid, ’foo’ or die "lchown: $!";

DESCRIPTION
       Provides a perl interface to the "lchown()" system call, on platforms
       that support it.

DEFAULT EXPORTS
       The following symbols are exported be default:

       lchown (LIST)
	   Like the "chown" builtin, but using the "lchown()" system call so
	   that symlinks will not be followed.	Returns the number of files
	   successfully changed.

	   On systems without the "lchown()" system call, "lchown" always
	   returns "undef" and sets "errno" to "ENOSYS" (Function not imple-
	   mented).

ADDITIONAL EXPORTS
       The following symbols are available for export but are not exported by
       default:

       LCHOWN_AVAILABLE ()
	   Returns true on platforms with the "lchown()" system call, and
	   false on platforms without.

SEE ALSO
       "chown" in perlfunc, lchown(2)

AUTHOR
       Nick Cleaton <nick@cleaton.net>

COPYRIGHT AND LICENSE
       Copyright (C) 2003-2004 by Nick Cleaton

       This library is free software; you can redistribute it and/or modify
       it under the same terms as Perl itself, either Perl version 5.8.0 or,
       at your option, any later version of Perl 5 you may have available.



perl v5.8.8			  2004-11-12			    Lchown(3)