improve menu

diff --git a/dev-bin/perltidy_random_setup.pl b/dev-bin/perltidy_random_setup.pl
index 22740f6e8398ec282624b7d4abfb6272969dfd39..abc5024925cb44fa77abedfb58ef71bb2af7e9f2 100755 (executable)
--- a/dev-bin/perltidy_random_setup.pl
+++ b/dev-bin/perltidy_random_setup.pl
@@ -261,9 +261,9 @@ EOM
     while (1) {
         my $nfiles_new    = @{$rnew_files};
         my $total_size_mb = file_size_sum_mb($rnew_files);
+        my $file_info     = get_file_info($rnew_files);
         my $ans           = queryu(<<EOM);
-
-   Number of files = $nfiles_new ; Total size $total_size_mb;
+$file_info
 R  Redo with a different glob
 F  Reduce total size by a fraction
 Y  Yes .. use these files