Hi everyone,
           Below is the script i am using to delete
few files in the list of user home directories. But
for now I am testing this code and just listing.
So the find command gives a different output when used
in bash prompt than when invoked in script.
Any help would be appreciated
Thak you
Sree.

#!/usr/bin/perl
$file_name="/etc/passwd.bkp";
$PATHP="/usr/bin/";
open ( FIN,$file_name) or die "cannot open $file_name
",$!;
while($line=<FIN>){
@user_details = split(":",$line);
my $user= $user_details[0];
my $Hme =  ($user_details[5]);
chomp($Hme);
chomp($user);
print "seraching \t ",  $Hme ,"\n" ;


system(" find $PATHP/find -name \*.txt  1>a.out ");

}

close FIN;


                
__________________________________
Do you Yahoo!?
Read only the mail you want - Yahoo! Mail SpamGuard.
http://promotions.yahoo.com/new_mail 

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to