in reply to Perl/Tk: gridInfo() returns a wrong row number

print 'gridder fixed: all gridInfo:';
print $_." " foreach @fixed_info;

[download]
Looks to me like $_ is empty at this point based on your output. What are you expecting there?

I usually don't put my foreach pieces at the end, but I don't know that might be a valid syntax, but if $_ is blank, you need to revisit what either how you are processing that foreach loop, or where the values of the array get set, because one of them is wrong.

Replies are listed 'Best First'.
Re^2: Perl/Tk: gridInfo() returns a wrong row number
by Shumkar (Novice) on Aug 12, 2010 at 05:48 UTC
    That was message from me ^^^; I forgot to log in.
[reply]
Re^2: Perl/Tk: gridInfo() returns a wrong row number
by Shumkar (Novice) on Aug 12, 2010 at 06:25 UTC
    >you need to revisit what either how you are processing that foreach loop, or where the values of the array get set, because one of them is wrong.

    I did it. I looked deep through my code few times and didn't find nothing. The [0] value of the 'numbers' and 'fixed' arrays return row number 1.

[reply]
Re^2: Perl/Tk: gridInfo() returns a wrong row number
by sierpinski (Chaplain) on Aug 12, 2010 at 12:41 UTC
    Ok I misread the output (or the code).... nevermind my previous comment...
[reply]
Re^2: Perl/Tk: gridInfo() returns a wrong row number
by Anonymous Monk on Aug 12, 2010 at 05:46 UTC
    Sorry, I don't understand what you are talking about. How could $_ be blank if there is the text:

    -in Tk::Frame=HASH(0x1ae4e5c) -column 1 -row 1 -colu mnspan 1 -rowspan 1 -ipadx 0 -ipady 0 -padx 0 -pady 0 -sticky w

    I rewrote it as 

                            foreach (@fixed_info) {
                            print $_." ";
                        }

    [download]
    - nothing changed.
[reply]
[d/l]

In Section Seekers of Perl Wisdom