Sponsored Content
Top Forums Shell Programming and Scripting perl hash - using a range as a hash key. Post 302449662 by pludi on Tuesday 31st of August 2010 06:39:10 AM
Old 08-31-2010
One way to construct this:
Code:
%hash = map { $a = '1G' if /768/ .. /1536/; $a = '2G' if /1537/ .. /2560/; $_ => $a }
  768 .. 2560;

These 2 Users Gave Thanks to pludi For This Post:
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

perl help on hash

I have line which is read from xml doc. I want to put this line into hash(perl variable). find line below and how i want to put this in hash <font size="10" type="int" name="ABC" > hash key should be size, type and name with corresponding value I doing as below:- $line =~ s/\s*.*?\s//;... (3 Replies)
Discussion started by: aju_kup
3 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. Shell Programming and Scripting

perl hash

Hi i am reading one file and creating Hash from the contents of it my issue is there are 3 different files in 3 different locations having same structure so for parsing these files i have one subroutine which returns hash after reading all the 3 files i need to create consolidated hash from three... (2 Replies)
Discussion started by: zedex
2 Replies

4. Shell Programming and Scripting

perl (word by word check if a hash key)

Hi, Now i work in a code that 1-get data stored in the database in the form of hash table with a key field which is the " Name" 2-in the same time i open a txt file and loop through it word by word 3- which i have a problem in is that : I need to loop word by word and check if it is a... (0 Replies)
Discussion started by: eng_shimaa
0 Replies

5. 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

6. Shell Programming and Scripting

Assigning a hash to another hash key

Hello, I have a hash in hsh. I need to assign it to another hash globalHsh. I think the below statement does not work $globalHsh{$id} = %hsh; What is the right way to assign it? Thanks (3 Replies)
Discussion started by: rsanjay
3 Replies

7. 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

8. 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

9. Shell Programming and Scripting

Dynamically parse BibTeX and create hash of hash

Hello gurus, Iam trying to parse following BibTex file (bibliography.bib): @book{Lee2000a, abstract = {Abstract goes here}, author = {Lee, Wenke and Stolfo, Salvatore J}, title = {{Data mining approaches for intrusion detection}}, year = {2000} } @article{Forrest1996, abstract =... (0 Replies)
Discussion started by: wakatana
0 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
MouseX::NativeTraits::HashRef(3pm)			User Contributed Perl Documentation			MouseX::NativeTraits::HashRef(3pm)

NAME
MouseX::NativeTraits::HashRef - Helper trait for HashRef attributes SYNOPSIS
package Stuff; use Mouse; has 'options' => ( traits => ['Hash'], is => 'ro', isa => 'HashRef[Str]', default => sub { {} }, handles => { set_option => 'set', get_option => 'get', has_no_options => 'is_empty', num_options => 'count', delete_option => 'delete', pairs => 'kv', }, ); DESCRIPTION
This module provides a Hash attribute which provides a number of hash-like operations. PROVIDED METHODS
These methods are implemented in MouseX::NativeTraits::MethodProvider::HashRef. get($key, $key2, $key3...) Returns values from the hash. In list context return a list of values in the hash for the given keys. In scalar context returns the value for the last key specified. set($key => $value, $key2 => $value2...) Sets the elements in the hash to the given values. delete($key, $key2, $key3...) Removes the elements with the given keys. exists($key) Returns true if the given key is present in the hash. defined($key) Returns true if the value of a given key is defined. keys Returns the list of keys in the hash. sorted_keys Returns the list of sorted keys in the hash. values Returns the list of values in the hash. kv Returns the key/value pairs in the hash as an array of array references. for my $pair ( $object->options->pairs ) { print "$pair->[0] = $pair->[1] "; } elements Returns the key/value pairs in the hash as a flattened list. clear Resets the hash to an empty value, like "%hash = ()". count Returns the number of elements in the hash. Also useful for not empty: "has_options => 'count'". is_empty If the hash is populated, returns false. Otherwise, returns true. accessor If passed one argument, returns the value of the specified key. If passed two arguments, sets the value of the specified key. METHODS
meta method_provider_class helper_type SEE ALSO
MouseX::NativeTraits perl v5.14.2 2011-12-04 MouseX::NativeTraits::HashRef(3pm)
All times are GMT -4. The time now is 01:44 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy