comment on

Maybe all you need are objects?

(pure intellectual masturbation ;)

$\="\n";$,="\t";
{
  package SAS;
  our ($ini,$last);
  sub _1 {$ini-$last}
  sub _2{$last-$ini}
  sub _3 {$ini-$last}
}
 
 
$SAS::ini=4;
$SAS::last=2;
 
print &SAS::_1, &SAS::_2 , &SAS::_3;
[download]

#or

 
package SAS2;
our ($ini,$last);
sub _1 {$ini-$last}
sub _2{$last-$ini}
sub _3 {$ini-$last}
 
package main;
 
 
$ini=10;
$last=5;
  
print SAS2::_1(), SAS2::_2(), SAS2::_3();
[download]

If you really need a hash like structure you may wanna try investigate the %SAS:: hash to grep all functions starting with an underscore.

print map {$_->()} grep {/::_/} values %SAS::;
[download]

of course this map-grep operation could be a method of your object ...

Cheers Rolf

UPDATE: expanded code examples

In reply to Re: Dynamic Hash value by LanX
in thread Dynamic Hash value by Bheema_Tyco

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.


Just another Perl shrine
	PerlMonks