Re^2: Tied Variables

Good example, but you could cut down further. :-)

use Tie::IxHash;
tie %thash, Tie::IxHash;

print $q->popup_menu(-name => $p, labels => \%thash, -values => [ keys
+ %thash ]);
[download]

Makeshifts last the longest.

Comment on Re^2: Tied Variables - why? Download Code

Replies are listed 'Best First'.
Re: Re^2: Tied Variables - why? by shotgunefx (Parson) on Sep 07, 2002 at 22:36 UTC
Good point. In CGI scripts, I like to keep the number of modules that need to be loaded down when it makes sense. Especially small things like this but YMMV. -Lee "To be civilized is to deny one's nature."	[reply]
Re^4: Tied Variables - why? by Aristotle (Chancellor) on Sep 07, 2002 at 23:08 UTC
I used to be in that camp too. Nowadays I don't confine myself though unless there is no pure-Perl module for the purpose. The reason is simple: any Perl code can be placed where a CGI script can, so any pure-Perl modules can be passed along with the script - even if I have to download the modules and copypaste the code into the file myself. Care needs to be taken that all the imports work correctly of course, but it's far from impossible. I'm thinking some sort of packaging mechanism based on Coderefs in @INC (was: Building a Simple Perl Module Database) could actually make the whole thing totally transparent. Makeshifts last the longest.	[reply]
Re: Re^4: Tied Variables - why? by shotgunefx (Parson) on Sep 07, 2002 at 23:15 UTC
Not an issue of installing modules, I have no fear of that and have half of CPAN installed. It's just when using vanilla CGI I like to keep the file IO down. So for simple ties I rarely use modules. -Lee "To be civilized is to deny one's nature."	[reply]