Hi there, just having a problem accessing a singular hash value. Check the
prog:
open(FILE, "I:\\itscript\\temp\\BBGPriceImport\.imp") or die"Input file
didn't open";
my @list;
my @list2;
my $i;
my %hashy = %_;
my $temp ='';
@list = <FILE>;
foreach $i (@list){
($list2[0], $list2[1], $list[2]) = split(/\s+/, $i, 3);
$hashy{$list2[0]} = $list2[1];
}
print("Tell me the CUSIP you want to retrieve the ticker for\n");
$temp = <STDIN>;
chomp($temp);
$temp = "\n" . $hashy{$temp}[1];
print($temp);
sleep 10;
for whatever reason, I can see the value of $hashy{$temp}[1] in the komodo
debugger but I can't get it to report on the command line. The assignment to
$temp is a shot at a quick fix. Anybody have an idea as to the dumb move I'm
making here?
Thanks,
Josh R
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/activeperl
