Your post is a little dense and also slightly confusing. This is the best I can do, but I'd like you to clarify what you want. In particular, what do you mean by depending on a hash key the position of the key and value needs to be placed on a specific position in two corresponding arrays?
# assume %h is your hash, @c and @d are the 'corresponding arrays'
@keys=keys %h;@vals=values %h;for($i=0;$i<@keys;$i++){$c[9] = $d[9] =
+$i if $keys[$i] eq 'something'}
I'm assuming:
- By 'depending on a hash key' you mean 'if one particular key exists in the hash'
- You know the 'specific position' (ie offset) in the other two arrays in which you want to place the offset of the particular key/value (in the code I've used 9 arbitrarily)
The zeroeth step in writing a module is to make sure that there isn't already a decent one in CPAN. (-- Pod::Simple::Subclassing)