I've been closing over hashes for years, for subs that need some persistent store, but not wanting to invoke memoize.
Below I've closed over a scalar and a hash. I get a warning of:
Use of uninitialized value $FIXED_STRING in hash element at ...
With hashes, this just works, but apparently the hash is empty, and that's fine. But the scalar value within the sub is undef.
What am I missing?
What is the easiest way to fix this, while still using a scalar to store a string, that is later used as a hash key?
#!/usr/bin/env perl
# demo of closure around sub, with persistent string
use strict;
use warnings;
for my $q ('a'..'g') {
do_something($q);
print "Done computing\n"
}
{
my $FIXED_STRING = 'fixed_string';
my %persistent;
sub do_something {
my $x = $_[0];
$persistent{$x}{$FIXED_STRING} = rand;
END {
for my $k (keys %persistent) {
print "$k: $persistent{$k}{$FIXED_STRING}\n";
}
}
}
}
-QM
--
Quantum Mechanics: The dreams stuff is made of
-
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.
|