Re^2: Nested While Loop Problem

Thank you very much. Im still a little green on hashes and wasnt sure if it would work in this situation without introducing yet another loop.

I had the two print statements to show that it prints fine from within the if statement. (it gives me the three directories like it should)

if ($fsline =~ /(.:\\.*)/){
   $dir = $1;
   print "$dir\n";  #works fine here
}
[download]

But if I print outside of the if statement I get the redundancies. And if there are then this command will repeat against the remote host multiple times for the same directory.

$badhost = "$logdir\\BADHOST.csv";
open (BADHOST,">>$badhost");
$dest = "$dir\\$file";  #will print redundancies here
$dest =~ s/[\s]//g;
$md5sumtmp = `rctrlx.exe $target /u "domain\\username" /p "password" /
+c md5sum.exe /app md5sum.exe $dest`;
[download]

Comment on Re^2: Nested While Loop Problem Select or Download Code

Replies are listed 'Best First'.
Re^3: Nested While Loop Problem by kennethk (Abbot) on Feb 06, 2009 at 15:49 UTC
I am having a little difficulty interpreting your question, so if this answer is off point I apologize. I think what is happening is that since you are accessing the $dir variable outside of the conditional loop, you are caching a value of $dir from a previous traverse of the loop. Perhaps this could be fixed with something along the lines of `if ($fsline =~ /(.:\\.*)/){ $dir = $1; print "$dir\n"; #works fine here } else { next; }` [download]	[reply] [d/l]
Re^4: Nested While Loop Problem by Smith (Initiate) on Feb 06, 2009 at 16:26 UTC
You interpreted my question perfectly, thank you. This fixes my problem. I had tried using next but not with the else. So close but so far away. Thanks very much for your help and fast response.	[reply]