$PATHP is the absolute path of the find utility
i guess the difference is bcos the value of $Hme is changing
where as at the command line / is constant
try printing out the value of $Hme each time to check
----- Original Message -----
From: "sreenath sarikonda" <[EMAIL PROTECTED]>
To: "Wiggins d Anconia" <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Thursday, June 17, 2004 1:15 PM
Subject: Re: find command works different when used in perl script
> Please group reply so everyone can help and be helped
> (and to avoidbeing accidentally ignored).
> > Wiggins ,
> > Thank you for the reply
> > You haven't told us what the difference is, but out
> > > of curiousity why
> > > are you using $PATHP to start your search, isn't
> > > that what $Hme is for?
>
>
> I am sending you a modified code and ouput is
> #./passwd.pl
> seraching /
> /usr/sbin/a.txt
> /scripts/a.txt
> /a.txt
> seraching /
> /usr/sbin/a.txt
> /scripts/a.txt
> /a.txt
> seraching /usr/bin
> seraching /
> /usr/sbin/a.txt
> /scripts/a.txt
>
> we can see that find is executing as find / etc....
> and now when I run the find command in bash
> find / -name \*.txt
> /var/apache/icons/small/README.txt
> /usr/openwin/lib/X11/Xcms.txt
> /usr/openwin/lib/X11/rgb.txt
> /usr/openwin/lib/locale/C/help/handbooks/sample.txt
> /usr/openwin/lib/locale/C/help/olittable/Ab-G.txt
> /usr/openwin/lib/locale/C/help/olittable/Bb.txt
> /usr/openwin/lib/locale/C/help/olittable/Ca.txt
> /usr/openwin/lib/locale/C/help/olittable/Cb.txt
> /usr/openwin/lib/locale/C/help/olittable/Cp.txt
> /usr/openwin/lib/locale/C/help/olittable/Da.txt
> /usr/openwin/lib/locale/C/help/olittable/Dt.txt
>
> ****************************************
> #!/usr/bin/perl -w
> use strict;
> my $file_name="/etc/passwd.bkp";
> my $PATHP="/bin/";
> open ( FIN,$file_name) or die "cannot open $file_name
> ",$!;
> my $line;
> while($line=<FIN>){
> my @user_details = split(":",$line);
> chomp(@user_details);
> my $user= $user_details[0];
> my $Hme = ($user_details[5]);
> #chomp($Hme);
> #chomp($user);
> print "seraching \t ", $Hme ,"\n" ;
> system("$PATHP/find $Hme -name \*.txt")
> }
> close FIN;
> __________________________________________________
> If I am able to work this out it would be a great
> benefit to me.
> Thank you
> sree
>
>
>
>
> __________________________________
> Do you Yahoo!?
> Yahoo! Mail Address AutoComplete - You start. We finish.
> 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>
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
