http://www.perlmonks.org?node_id=960551


in reply to Re: glob behavior
in thread glob behavior

I use ActivePerl v.5.14.1 on WinXP.
The version of File::Glob is 1.12

Update: I changed the loop to:
for my $t (keys %address) { my $file = glob ("$address{$t}/Test*"); print "$t : $address{$t} : $file, \n###\n"; print "$t : $address{$t} : ", glob ("$address{$t}/Test*"), "\n---\ +n"; }
It prints:
A : U:/TEMP/TEMP/A : U:/TEMP/TEMP/A/Test01.txt, ### A : U:/TEMP/TEMP/A : U:/TEMP/TEMP/A/Test01.txt --- Use of uninitialized value $file in concatenation (.) or string at ... + line 17. D : U:/TEMP/TEMP/D : , ### D : U:/TEMP/TEMP/D : U:/TEMP/TEMP/D/Test04.txt --- C : U:/TEMP/TEMP/C : U:/TEMP/TEMP/C/Test03.txt, ### C : U:/TEMP/TEMP/C : U:/TEMP/TEMP/C/Test03.txt --- Use of uninitialized value $file in concatenation (.) or string at ... + line 17. E : U:/TEMP/TEMP/E : , ### E : U:/TEMP/TEMP/E : U:/TEMP/TEMP/E/Test05.txt --- B : U:/TEMP/TEMP/B : U:/TEMP/TEMP/B/Test02.txt, ### B : U:/TEMP/TEMP/B : U:/TEMP/TEMP/B/Test02.txt ---