At 11:40 AM -0400 10/11/02, mike wrote:
>../build.pl
>/root/cvs/esound # this the output of $dir3
>/
Is your output of 'print "$dir3\n"' :
/root/cvs/esound
/
Or just:
/root/cvs/esound
From your code, I suspect the former since $dir3 is supposed to end
with a "/"....
And from that it looks like you are forgetting to remove the line
endings from the package names you read in from "buildlist" so $dir3 is
"/root/cvs/esound\n/" and not "/root/cvs/esound/".
Try using 'chomp' before using the package names:
foreach my $pkg (@pkg){
chomp $pkg;
my $dir1 = $pkg;
...
You might also want to change your die statement to:
.... or die "cannot change to \"$dir3\": $!"
to get more informative error messages.
---Larry
+------------------------------------------------------------------------+
| Larry Coffin, G.P.H. Watertown, MA |
| http://www.PointInfinity.com/lcoffin/ [EMAIL PROTECTED] |
+------------------------------------------------------------------------+
COBOL programs are an exercise in Artificial Inelegance.
-
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
