my $random_file = $names[rand(@names-1)];