Sponsored Content
Top Forums Shell Programming and Scripting Print perl hash value in foreach loop Post 302972597 by Aia on Sunday 8th of May 2016 05:59:04 PM
Old 05-08-2016
Quote:
Originally Posted by timj123
It's similar to the following:

Code:
          'Key1' => [
                      ' Value1',
                      ' Value2',
                      ' Value3',
                      ' Value4',
                      ' Value5',
                      ' Value6',
                      ' Value7',
                      ' Value8',
                      ' Value9'
                    ],

Notice that 'space Value1' is not the same that 'Value1'. Is that a copy and paste from your output?
If that is the case, $hash1{$y} or $hash1{"$y"} is undefined, since it would be equivalent to $hash1{' Value1'} and the key dereference should be $hash1{'Value1'}

Last edited by Aia; 05-08-2016 at 07:13 PM.. Reason: Add explanation
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Perl - Iterating a hash through a foreach loop - unexpected results

i've reworked some code from an earlier post, and it isn't working as expected i've simplified it to try and find the problem. i spent hours trying to figure out what is wrong, eventually thinking there was a bug in perl or a problem with my computer. but, i've tried it on 3 machines with the... (5 Replies)
Discussion started by: quantumechanix
5 Replies

2. Shell Programming and Scripting

Print Entire hash list (hash of hashes)

I have a script with dynamic hash of hashes , and I want to print the entire hash (with all other hashes). Itried to do it recursively by checking if the current key is a hash and if yes call the current function again with refference to the sub hash. Most of the printing seems to be OK but in... (1 Reply)
Discussion started by: Alalush
1 Replies

3. UNIX for Dummies Questions & Answers

Foreach loop to run a perl script on multiple files

Hi, I have thousands of files in a directory that have the following 2 formats: 289620178.aln 289620179.aln 289620180.aln 289620183.aln 289620184.aln 289620185.aln 289620186.aln 289620187.aln 289620188.aln 289620189.aln 289620190.aln 289620192.aln.... and: alnCDS_1.fasta (1 Reply)
Discussion started by: greptastic
1 Replies

4. UNIX for Advanced & Expert Users

Perl loop txt and check if a hash key

Hi, The task i have to do is to 1- create a database contains the Names .run the query and store results in hash make the Name field is the hash key 2- in the same time i have a txt which i will loop through it word by word and check for each word if a hash key ( compare it with the Names in... (0 Replies)
Discussion started by: eng_shimaa
0 Replies

5. Shell Programming and Scripting

Perl question - print last element in a hash?

I am modifying someone else's code. There is a foreach statement printing the contents of a hash. Can someone give me an example of printing the last element in a hash? The output currently is A B C D E I want the output to be E (1 Reply)
Discussion started by: streetfighter2
1 Replies

6. Shell Programming and Scripting

Perl Hash:Can not keep hash data in the same order that it was inserted

Can Someone explain me why even using Tie::IxHash I can not get the output data in the same order that it was inserted? See code below. #!/usr/bin/perl use warnings; use Tie::IxHash; use strict; tie (my %programs, "Tie::IxHash"); while (my $line = <DATA>) { chomp $line; my(... (1 Reply)
Discussion started by: jgfcoimbra
1 Replies

7. Programming

PERL, search and replace inside foreach loop

Hello All, Im a Hardware engineer, I have written this script to automate my job. I got stuck in the following location. CODE: .. .. ... foreach $key(keys %arr_hash) { my ($loc,$ind,$add) = split /,/, $arr_hash{$key}; &create_verilog($key, $loc, $ind ,$add); } sub create_verilog{... (2 Replies)
Discussion started by: riyasnr007
2 Replies

8. Shell Programming and Scripting

perl hash - using a range as a hash key.

Hi, In Perl, is it possible to use a range of numbers with '..' as a key in a hash? Something in like: %hash = ( '768..1536' => '1G', '1537..2560' => '2G' ); That is, the range operation is evaluated, and all members of the range are... (3 Replies)
Discussion started by: dsw
3 Replies

9. Shell Programming and Scripting

Compare values of hashes of hash for n number of hash in perl without sorting.

Hi, I have an hashes of hash, where hash is dynamic, it can be n number of hash. i need to compare data_count values of all . my %result ( $abc => { 'data_count' => '10', 'ID' => 'ABC122', } $def => { 'data_count' => '20', 'ID' => 'defASe', ... (1 Reply)
Discussion started by: asak
1 Replies

10. Shell Programming and Scripting

Need to print hash of hash in table format

Hi, I have a hash of hash where it has name, activities and count i have data like this - $result->{$name}->{$activities} = $value; content of that are - name - robert tom cat peter activities - running, eating, sleeping , drinking, work i need to print output as below ... (3 Replies)
Discussion started by: asak
3 Replies
orddict(3erl)						     Erlang Module Definition						     orddict(3erl)

NAME
orddict - Key-Value Dictionary as Ordered List DESCRIPTION
Orddict implements a Key - Value dictionary. An orddict is a representation of a dictionary, where a list of pairs is used to store the keys and values. The list is ordered after the keys. This module provides exactly the same interface as the module dict but with a defined representation. One difference is that while dict considers two keys as different if they do not match ( =:= ), this module considers two keys as different if and only if they do not com- pare equal ( == ). DATA TYPES
ordered_dictionary() as returned by new/0 EXPORTS
append(Key, Value, Orddict1) -> Orddict2 Types Key = Value = term() Orddict1 = Orddict2 = ordered_dictionary() This function appends a new Value to the current list of values associated with Key . An exception is generated if the initial value associated with Key is not a list of values. append_list(Key, ValList, Orddict1) -> Orddict2 Types ValList = [Value] Key = Value = term() Orddict1 = Orddict2 = ordered_dictionary() This function appends a list of values ValList to the current list of values associated with Key . An exception is generated if the initial value associated with Key is not a list of values. erase(Key, Orddict1) -> Orddict2 Types Key = term() Orddict1 = Orddict2 = ordered_dictionary() This function erases all items with a given key from a dictionary. fetch(Key, Orddict) -> Value Types Key = Value = term() Orddict = ordered_dictionary() This function returns the value associated with Key in the dictionary Orddict . fetch assumes that the Key is present in the dictio- nary and an exception is generated if Key is not in the dictionary. fetch_keys(Orddict) -> Keys Types Orddict = ordered_dictionary() Keys = [term()] This function returns a list of all keys in the dictionary. filter(Pred, Orddict1) -> Orddict2 Types Pred = fun(Key, Value) -> bool() Key = Value = term() Orddict1 = Orddict2 = ordered_dictionary() Orddict2 is a dictionary of all keys and values in Orddict1 for which Pred(Key, Value) is true . find(Key, Orddict) -> {ok, Value} | error Types Key = Value = term() Orddict = ordered_dictionary() This function searches for a key in a dictionary. Returns {ok, Value} where Value is the value associated with Key , or error if the key is not present in the dictionary. fold(Fun, Acc0, Orddict) -> Acc1 Types Fun = fun(Key, Value, AccIn) -> AccOut Key = Value = term() Acc0 = Acc1 = AccIn = AccOut = term() Orddict = ordered_dictionary() Calls Fun on successive keys and values of Orddict together with an extra argument Acc (short for accumulator). Fun must return a new accumulator which is passed to the next call. Acc0 is returned if the list is empty. The evaluation order is undefined. from_list(List) -> Orddict Types List = [{Key, Value}] Orddict = ordered_dictionary() This function converts the Key - Value list List to a dictionary. is_key(Key, Orddict) -> bool() Types Key = term() Orddict = ordered_dictionary() This function tests if Key is contained in the dictionary Orddict . map(Fun, Orddict1) -> Orddict2 Types Fun = fun(Key, Value1) -> Value2 Key = Value1 = Value2 = term() Orddict1 = Orddict2 = ordered_dictionary() map calls Func on successive keys and values of Orddict to return a new value for each key. The evaluation order is undefined. merge(Fun, Orddict1, Orddict2) -> Orddict3 Types Fun = fun(Key, Value1, Value2) -> Value Key = Value1 = Value2 = Value3 = term() Orddict1 = Orddict2 = Orddict3 = ordered_dictionary() merge merges two dictionaries, Orddict1 and Orddict2 , to create a new dictionary. All the Key - Value pairs from both dictionaries are included in the new dictionary. If a key occurs in both dictionaries then Fun is called with the key and both values to return a new value. merge could be defined as: merge(Fun, D1, D2) -> fold(fun (K, V1, D) -> update(K, fun (V2) -> Fun(K, V1, V2) end, V1, D) end, D2, D1). but is faster. new() -> ordered_dictionary() This function creates a new dictionary. size(Orddict) -> int() Types Orddict = ordered_dictionary() Returns the number of elements in an Orddict . store(Key, Value, Orddict1) -> Orddict2 Types Key = Value = term() Orddict1 = Orddict2 = ordered_dictionary() This function stores a Key - Value pair in a dictionary. If the Key already exists in Orddict1 , the associated value is replaced by Value . to_list(Orddict) -> List Types Orddict = ordered_dictionary() List = [{Key, Value}] This function converts the dictionary to a list representation. update(Key, Fun, Orddict1) -> Orddict2 Types Key = term() Fun = fun(Value1) -> Value2 Value1 = Value2 = term() Orddict1 = Orddict2 = ordered_dictionary() Update a value in a dictionary by calling Fun on the value to get a new value. An exception is generated if Key is not present in the dictionary. update(Key, Fun, Initial, Orddict1) -> Orddict2 Types Key = Initial = term() Fun = fun(Value1) -> Value2 Value1 = Value2 = term() Orddict1 = Orddict2 = ordered_dictionary() Update a value in a dictionary by calling Fun on the value to get a new value. If Key is not present in the dictionary then Initial will be stored as the first value. For example append/3 could be defined as: append(Key, Val, D) -> update(Key, fun (Old) -> Old ++ [Val] end, [Val], D). update_counter(Key, Increment, Orddict1) -> Orddict2 Types Key = term() Increment = number() Orddict1 = Orddict2 = ordered_dictionary() Add Increment to the value associated with Key and store this value. If Key is not present in the dictionary then Increment will be stored as the first value. This could be defined as: update_counter(Key, Incr, D) -> update(Key, fun (Old) -> Old + Incr end, Incr, D). but is faster. NOTES
The functions append and append_list are included so we can store keyed values in a list accumulator . For example: > D0 = orddict:new(), D1 = orddict:store(files, [], D0), D2 = orddict:append(files, f1, D1), D3 = orddict:append(files, f2, D2), D4 = orddict:append(files, f3, D3), orddict:fetch(files, D4). [f1,f2,f3] This saves the trouble of first fetching a keyed value, appending a new value to the list of stored values, and storing the result. The function fetch should be used if the key is known to be in the dictionary, otherwise find . SEE ALSO
dict(3erl) , gb_trees(3erl) Ericsson AB stdlib 1.17.3 orddict(3erl)
All times are GMT -4. The time now is 11:06 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy