my @file    = glob "*";
print sort join("\n", @file )."\n";