Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: Storing multiple arguments in a data structure that allows for future expansion

by appleb (Novice)
on May 03, 2007 at 03:53 UTC ( #613309=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    parseNumericArgList($args{p}, 'pipeline', 1);
    parseNumericArgList($args{o}, 'overlap', 1);
    
  2. or download this
    sub parseNumericArgList {
    
        my ($arg, $tag, $deflt) = @_;
    ...
        $ref->{$addNm} = $addVal;
        return $ref;
    }
    
  3. or download this
    0  HASH(0x9e2930)
       'overlap' => 100
       'pipeline' => 1
    ...
    3  HASH(0xd8ead0)
       'overlap' => 200
       'pipeline' => 3
    
  4. or download this
    foreach $run (@arrAllArgs) {
        foreach $ak (keys %{$run}) {
            $runArgs{$ak} = $run->{$ak};
        }
        processOne();
    }
    

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://613309]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (2)
As of 2021-08-02 18:54 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My primary motivation for participating at PerlMonks is: (Choices in context)








    Results (28 votes). Check out past polls.

    Notices?