Ken, your mixing your @ with your %
Try this:
#!/usr/bin/perl
&GetMarmots;
sub GetMarmots {
%result = ();
$result{'steppe marmot'} = 4;
$result{'himalayan marmot'} = 3;
$result{'mongolian marmot'} = 1;
$result{'woodchuck'} = 6;
return %result;
}
foreach (keys %result) {
Does this look correct below. I know that I should test but due to the
environment that this program lives it is difficult track down problems.
It is a trigger off of a db. Can anyone take a few seconds to provide
feedback. Is there a betterway? The problem that I am trying to solve
here is a slow
You could use the module that I am trying to use but having problems:
"AppConfig"
or you could use this (it works but is to limited for what I need):
#/usr/bin/perl
my $file = "/dir/somefile.txt";
open (CONFIG, "< $file") or die "Can't open $file";
while () {
chomp; #no
Howdy,
I'm trying to run the AppConfig module, but making a error somewhere, it
should be straight forward but
At any rate here is the code, followed by the config file followed by
the error.
#code
#!/usr/bin/perl
use AppConfig;
my $file = "/var/tmp/config.txt";
my $config = AppConfig->ne
I'm looking for a module where I can encrypt and decrypt
values. Obviously, the more secure the better. Most of
everything that I have seen is in the way of one way
hash digests. The main thing is I have to be able to
get the values back out.
Suggestions appreciated.
jeffl
--
To unsubscribe,
