note
cLive ;-)
<p>All good responses so far. I'll agree, in this example, I can't see a reason though.</p>
<p>Just to add, another useful instance is if you want to avoid a long nested "if/else" structure, eg, instead of:</p>
<code>
if ($var eq 'one')
{
&subOne;
}
elsif ($var eq 'two')
{
&subTwo;
}
...
elsif ($var eq 'ten') {
&subTen;
}
else
{
die "Invalid \$var";
}
</code>
use this instead
<code>
my %subs = ( one => \&subOne,
two => \&subTwo,
...
ten => \&subTen,
);
if ( exists $subs{$var} )
{
&{$subs{$var}};
}
else
{
die "Invalid \$var";
}
</code>
623162
623162