Hi
I wrote this script but don't know how to get the owner of that directory !!
#!/usr/bin/perl
use strict ;
use warnings ;
while ( my $line = <STDIN> ) {
my @array = split(":",$line) ;
my $loginid = $array[0] ;
my $uid = $array[2];
my $guid = $array[3];
my $dir = $array[5];
print "$loginid:$dir\n" ;
if ( -d $dir ) {
print "$dir exists !! \n";
}
else {
print "$dir does not exists !! \n";
}
} # end of while
regards
CVR
On Tue, 28 Dec 2004 12:36:29 +0530, Chandrakant Reddy
<[EMAIL PROTECTED]> wrote:
> Hi
> How do I check whether user's home directory exist or not, & if
> exists then whether it is owned by his uid
>
> The perl script will have this information :
> username:x:20205:10000:my name :/home/username:/bin/bash
>
> regards
> CVR
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
