$dir = "D:\books";
@output = `dir $dir /B /S`;