Re: What causes HASH to print?

Because you don't have a hash, or better you have a hash with a hashref as a key and no value assigned.
Replace the curlies and make that

%SA_DATA_LOCK_DOWN = (
  'SECALERT_ALERTS_ID'=>0,
  'SECALERT_NUM'=>0,
  'TECH_SPEC_ID'=>0,
  'OS_APP_NAME'=>0,
)
[download]

holli, /regexed monk/

Comment on Re: What causes HASH to print? Download Code

Replies are listed 'Best First'.

Re^2: What causes HASH to print?
by Thelonius (Priest) on Feb 27, 2007 at 16:32 UTC

Reference found where even-sized list expected
[download]

put it in before asking a question

UPDATE: And, if the warning is a little obscure, which in this case it is if you haven't seen it before, you can also "use diagnostics;". For example, perl -Mdiagnostics -w pm602312.pl gives:

Reference found where even-sized list expected at pm602312.pl line 2
 (W misc) You gave a single reference where Perl was expecting a list
 with an even number of elements (for assignment to a hash). This usua
+lly
 means that you used the anon hash constructor when you meant to use
 parens. In any case, a hash requires key/value pairs.
    
        %hash = { one => 1, two => 2, };        # WRONG
        %hash = [ qw/ an anon array / ];        # WRONG
        %hash = ( one => 1, two => 2, );        # right
        %hash = qw( one 1 two 2 );                      # also fine
[download]

[reply]
[d/l]
[select]


Think about Loose Coupling
	PerlMonks