in reply to Re^2: If Statements and Regular Expressions
in thread If Statements and Regular Expressions

Interesting. Using Perl 5.8.8 rather than 5.10 makes the same saving for 'Big hash':

Big hash: 61 Mb
More hashes: 52 Mb
Savings: 16%

[download]

so should we all use 5.8.8 rather than 5.10? Actually 14 (or 16) % is sufficiently small to be irrelevant for most purposes. Clarity of code is the more important factor (not that I'm claiming that my code is any clearer mind you), especially for a first cut - optimize later if you need to.

Perl reduces RSI - it saves typing

Replies are listed 'Best First'.
Re^4: If Statements and Regular Expressions
by JavaFan (Canon) on Oct 01, 2008 at 00:56 UTC
    Whether the code becomes clearer when using a big hash is subjective. In your example, you got away by not having to use a different order of the fields than you define, but the original code doesn't have that luxery, as the output has the fields in a different order than the input.

    Which means, you either have to use string literals as key names or put the field names into separate variables. The former loses you some of the benefits of using 'use strict' as misspellings in field names aren't found by the compiler (and not even by the runtime, 'use warnings' won't help you either). In the latter case, you're just shifting what you are trying to avoid. There's little difference in: 

        my %big_hash;
    my $field_name1 = "field_name1";
    my $field_name2 = "field_name2";
    ...
    $big_hash{$key}{$field_name1}
    $big_hash{$key}{$field_name2}
    ...

    [download]
    or 
        my %field_name1;
    my %field_name2;
    ...
    $field_name1{$key}
    $field_name2{$key}

    [download]
    I don't want to dogma "always group in a big hash instead of using parallel datastructures", nor the opposite. There are pros and cons.
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom