Note that %combined = (%hash1, %hash2); suffers from performance penalty. If performance's a concern, it's always better to do map { $hash1{$_} = $hash2{$_} } keys %hash2; (unless you want to keep %hash1 and %hash2 intact, which doesn't seem to be the case in your question)
use Benchmark;
my $size = 100000;
my %hash1 = map { $_ => 1 } (0..$size);
my %hash2 = map { $_ => 1 } ($size..(2*$size));
my $t0 = new Benchmark;
my %combined = (%hash1, %hash2);
my $t1 = new Benchmark;
print "Combining took:",timestr(timediff($t1, $t0)),"\n";
$t0 = new Benchmark;
map { $hash1{$_} = $hash2{$_} } keys %hash2;
my $t1 = new Benchmark;
print "Map took:",timestr(timediff($t1, $t0)),"\n";
When size = 100000 and 1000000 respectively, the results:
inq123@perlmonks$ perl test.pl
Combining took: 0 wallclock secs ( 0.28 usr + 0.02 sys = 0.30 CPU)
Map took: 0 wallclock secs ( 0.18 usr + 0.00 sys = 0.18 CPU)
inq123@perlmonks$ perl test.pl
Combining took:42 wallclock secs (41.53 usr + 0.21 sys = 41.74 CPU)
Map took: 2 wallclock secs ( 1.89 usr + 0.05 sys = 1.94 CPU)
So performance penalty is manifested when the hashs contain tens of thousands of elements, which is not too rare.
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.