Greetings, Monks. I've been cobbling away at creating a Perl based CMS, for a few years now. It's turned out quite nice, and is very featurefull -- including a Forum.

To the point;
As I indicated, it's been built over several years, and it shows. So I'm hoping to clean things up enough to release it into the wild.

I'm currently looking at the following message from perl: 

defined(%hash) is deprecated at

[download]
This, as many/most of you already know, was depreciated around v.5.10. The actual code block(s) that trigger the message are: 
...
    if(($position eq 'l' || $position eq 'r') && defined %leftright) {
      %tags = (%tags,%leftright);
    } elsif(($position eq 't' || $position eq 'b') && defined %topbott
+om) {
      %tags = (%tags,%topbottom);
    }
...

[download]
While Perl, itself, suggest simply removing defined, and I suppose I have little reason to doubt the brilliance of Perl -- hell, it's smarter than I am. But my investigations indicate that others looking to deal with this same situation, do so in a myriad of different ways. So I thought it prudent to get some feedback from those here, I've come to trust. :)

In other words; How would you deal with it?

Thanks, for all your time, and consideration.

--Chris

¡λɐp ʇɑəɹ⅁ ɐ əʌɐɥ puɐ ʻꜱdləɥ ꜱᴉɥʇ ədoH

In reply to Code cleanup; how best to deal with: defined(%hash) is deprecated at... by taint

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.