|
|
Sponsored Content
Top Forums
Shell Programming and Scripting
perl - passing hash references to functions
Post 302349725 by SFNYC on Tuesday 1st of September 2009 04:46:09 PM
09-01-2009
|
|
10 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
Hi:
How do I pass a hash table down to a subroutine along with some other variables?
For example, I have say a subroutine play_with_hash:
sub play_with_hash
{
my( $var1, $var2, %my_hash ) = @_;
#do stuff with %my_hash
...........
}
Then I want to call the subroutine... (1 Reply)
Discussion started by: mirzabhai
1 Replies
2. Shell Programming and Scripting
All,
I have a sh script of the following tune:
function a () { #functionality.. }
function b () { #functionnlity.. }
function check () { # this function checks for env and if all fine call build }
function usage () { #sh usage details }
function build () { #calls either a or b or... (5 Replies)
Discussion started by: vino
5 Replies
3. Shell Programming and Scripting
Hi,
I have a function that hold 3 arrayies.
I need to pass them to another function as an input, for further use
Could you please explain how to do that.
Thanks (5 Replies)
Discussion started by: yoavbe
5 Replies
4. Shell Programming and Scripting
I have a script (say script1.sh ) and I am calling a script (say script2.sh) within the script1.sh. Here in script1.sh I have a hash ( say %hash1) and i have to pass this hash to script2.sh. Basically i have to do some processing in Scirpt2.sh based on the hash(key,values). I wanted to know how can... (2 Replies)
Discussion started by: ammu
2 Replies
5. Shell Programming and Scripting
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
6. Shell Programming and Scripting
Can someone explain where can we actually used
print $var->;
or
print $$var
When does the -> becomes necessary and when its optional. (1 Reply)
Discussion started by: dinjo_jo
1 Replies
7. UNIX for Advanced & Expert Users
Hi Everyone,
Can anyone help me how do i call hash variable in to sql query in perl. Please see the script below
i have defined two Hash %lc and %tab as below
$lc{'REFF'}='V_RES_CLASS';
$lc{'CALE'}='V_CAP_CLASS';
$lc{'XRPD'}='V_XFMR_CLASS';
$tab{'V_RES_CLASS'}='V_MFR_SERS';... (6 Replies)
Discussion started by: jam_prasanna
6 Replies
8. Shell Programming and Scripting
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
Hi All
I have a doubt and want to be cleared I am using
@array = (10, 20);
$rarray = \@array;
#print "$rarray\n";
#print "@$rarray\n";
$rr= \$array;
#print $$rr;
$rr++;
print $$rr;
As you can see the $rr contains the reference to the first element of the array , now as the... (5 Replies)
Discussion started by: parthmittal2007
5 Replies
10. Shell Programming and Scripting
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
LEARN ABOUT DEBIAN
digest::multihash
Digest::MultiHash(3pm) User Contributed Perl Documentation Digest::MultiHash(3pm) NAME
Digest::MultiHash - XOR based, variable width multiplexing of hashes (a generalized Digest::SV1). SYNOPSIS
use Digest::MultiHash; my $d = Digest::Multihash->new( width => 16, # bytes hashs => ["SHA-512", "Whirlpool"], # see below for arbitrary arguments ); $d->add($data); print $d->hexdigest; DESCRIPTION
This class inherits from Digest::base, and provides generalized digest multiplexing. It will multiplex all calls to "add" to all of it's sub digest objects. Likewise, when the final digest is extracted the digests will be extracted and then XOR'd over eachother according to "width". "width" will default to the width of the first hash if unspecified. "hashes" defaults to "SHA-1" for compatibility reasons. This module is useful for generating keys from passphrases, by supplying the desired width and simply making sure there is enough data from the combined hashes. METHODS
See Digest for the complete API. This module inherits from Digest::base. new This methods accepts a hash reference or an even sized list of parameters named according to the methods. add digest Compute the hash by calling "digest" on all of the subhashes, splitting the result up into "width" sized chunk, and then XORing these together. If the result is not aligned on "width" the result will not be truncated. The shorter string will still be XOR'd with the hash, even if this only affects part of the result. If there are not at least "width" bytes of data in the output of the combined hashes an error is thrown. clone Clones the hash. hashes Get the array of hashes to use. Array values in this will be dereferenced before the call to "new" in Digest to allow passing of arbitrary arguments. Blessed objects (of any class) will be used verbatim. The list of hashes cannot be changed after construction. width Get/set the byte-width to use. SEE ALSO
Digest, Digest::SV1, Digest::SHA1 perl v5.14.2 2009-10-19 Digest::MultiHash(3pm)