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