ok. I want you to add this to your code. at the top add 
use diagnostics;

[download]
you probably ment to have this instead 
my @tableArray = (
     [ 1..COLS ],
     [ 1..COLS ],
     [ 1..COLS ],
     [ 1..COLS ],
     [ 1..COLS ],
     [ 1..COLS ],
     [ 1..COLS ],
     [ 1..COLS ],
     [ 1..COLS ],
     [ 1..COLS ]
);

[download]
so go ahead and change that also. Now were going to add a few lines of debugging code. 
sub addToTable {
     foreach (@_) {
          print "$_\n";
     }
     print "elements passed " . scaler(@_) ."\n";

[download]
Now go ahead and run your script. This should then show you that when you click on a phone number it is passing 5 elements to the sub. And when you click on the date it will tell you that you only passed 4. Because your sub is setup to take the correct amount of args when you click on the phone number it is causing your data to be one element off when clicking on the phone number. I'm not sure what exactly is causing it, but I'll keep playing with it. But this should give you a good idea on where to start since its your code :)


-bn

In reply to Re: Tk::Error that I do not understand. by BeernuT
in thread Tk::Error that I do not understand. by rbc

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.