Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Recreating hash

by GrandFather (Sage)
on Sep 12, 2012 at 01:59 UTC ( #993118=note: print w/replies, xml ) Need Help??


in reply to Recreating hash

The data you show has an error in it. There should be a ' following "(UTC)".

Assuming the code shown in the OP with the syntax error corrected:

my %hash = %$VAR1; print "At $hash{alerts}[0]{timestamp}: $hash{alerts}[0]{text}\n";

Prints:

At 1347395226: 95.019 (value) > 95 (max limit) between Tue 20:19 - +Tue 20:20 (UTC)

If that's not the help you wanted you'll need to be more explicit.

True laziness is hard work

Replies are listed 'Best First'.
Re^2: Recreating hash
by kitkit201 (Initiate) on Sep 12, 2012 at 02:10 UTC
    Whops on the syntax error.. Thanks for your quick reply GF. I got the second part of my answer and now looking for the first part. Since this is the output of the hash, how would you recreate this hash from scratch in a perl program (with the same elements and what not)? I'm having trouble with the elements and the double references of => into =>.

      I don't understand "how to create it in the perl code" given that what you show is Perl code. What are you actually having trouble with? Maybe you should give us some context so we understand where you are coming from?

      True laziness is hard work

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://993118]
help
Chatterbox?
[choroba]: Algorithm::Loops
[Corion]: choroba: I'm using that to generate the permutations, but I don't know how the user can pass the intended values to my function in a sane way
[Corion]: I have a prototype that permutes the get_parameters, but the values used for the get parameters should be different from the values used for the headers and potentially for parts of the URL
[Corion]: But yes, in general, my approach will be "split the URL into another set of parameters, generate an array of allowed values for each parameter and then NestedLoops() over the set"
[choroba]: hmm... so you need something like bag from Test::Deep, but not for checking, but for generation
[Corion]: This has the dual use of easily requesting sequential URLs and also being suitable for testing
[Corion]: For testing, I want to skip all tests with the same value(s) once one test fails to cut down on the number of failing tests
[Corion]: choroba: Yes, in a way I
[Corion]: ... I'm treating the incoming value sets as bags... Maybe I'll just put the burden on the user, at least in the first attempt at a full API. generate( headers => [{ 'Content-Type' => 'text/plain' }, {'Content-Type' => 'text/json' ] ), even ...
[Corion]: ... if that is cumbersome for the caller to specify. On the other hand, maybe there isn't that big a need for permuting the header values

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (5)
As of 2017-01-17 08:20 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you watch meteor showers?




    Results (152 votes). Check out past polls.