Perl Effizienz beim Schreiben in Datei

Question

Ich erstelle eine Datenbank mit einigen Informationen über Dateien.
Beispiel: Dateiname | Größe | modify_date ...

Ich dachte, was in dieser Situation effizienter ist:

1) Für jede Datei, um die Informationen erhalten und drucken sie in meiner Datei

foreach my $file (@listOfFiles) {     
    my %temporary_hash = get_info_for_file($file); //store in a tempoarary hash 
                the informations for current file 
    print_info(%temporary_hash, $output_file);  // print the information in my output file 
} 

2) Shop die Informationen für jede Datei in einem Hash und drucken alle Hash auf einmal

foreach my $file(@listOfFiles){ 
    store_info_in_hash(get_info_for_file($file), %hash); // for each file, store the 
                  information in a global hash 

    } 
print_all_info(%hash, $output_file);      //after i have informations for each file 
                  print the whole hash in my output file 

Answer 1

Sie Es ist falsch, die Effizienz zu berücksichtigen, bevor Sie Ihr Programm überhaupt in Betrieb genommen haben

Sie sollten Ihren Code so klar wie möglich schreiben und debuggen. Nur dann, wenn es nicht schnell genug für Ihren Zweck läuft, sollten Sie Ihren Code durch einen Profiler legen, um die Engpässe zu entdecken, die die meiste Zeit benötigen

Die zwei Optionen, die Sie zeigen, werden wahrscheinlich nicht sehr unterschiedlich sein, es sei denn Ihre Dateien sind enorm

Answer 2

Wenn ich einen Benchmark-Test für die beiden Optionen mache, bekomme ich diese Ergebnisse (was, wenn ich die Informationsgröße für jede Datei vergrößern werde, zu noch größeren Unterschieden zwischen den beiden führen wird).