PERL / DBI: Umstieg von Linux auf Windows Server

[Uurtyp]

hmmm also ganz klar komm i trotzdem noch ned damit
ich mein - readdir is echt genial
weils mir alles so ausspuckt wie ich will
nur
ich möcht directories als einen link als files ... und wie kenn ich damit auseinander, ob es ein dir od ein file is ( abgesehen davon möcht ich die dirs . und .. nat auch nicht ...)

ich hab derzeit:

$dir = "./Downloads";

opendir(DIR, $dir) || die "konnte $dir nicht öffnen: $!";
@files = readdir(DIR);
closedir DIR;

damit listet er mir brav absolut alles auf - von . über alle dirs bis zu allen files.

ich möcht jetzt aber nur die dirs haben
bzw - es wird im endeffekt nur dirs geben -> kann er auch alles auflisten ... jedenfalls möchte ich, dass die directories verlinkt werden auf die aktuelle seite, und nur den directory name als argument.
-> downloads.cgi?dir=$dir
wäre cool wenn du mir da weiterhelfen könntest.
filehandling und cookies killen mich in perl - find ich einfach behindert.
danke nomal