# bei deinem code ist das hier das Selbe:
print $dirlist{$i}; # Hash-Zugriff, geschweifte Klammern
print $red[$i]; # Array-Zugriff, eckige Klammern