opendir (DIR,"./");
@files = readdir DIR;