$dir = "./";
opendir( DIRS, $dir );