in reply to Re^3: Perl - TK - Listbox insertion problem
in thread Perl - TK - Listbox insertion problem
That right their inserts into the listbox at the 'end' every time and its not an empty string! So Why wont it work the same way with the response from the server????if ($postSplit[0] eq "/join") { #Check for erros if ($postSplit[1] eq "") { &error("Incorrect format must me /join #channel"); } # Begin Error Routine # Used to simplify error reporting sub error { my $error = $_[0]; my $errorMessage = "*** ERROR *** $error *** ERROR ***"; + # Our standard Error message $scrolledText -> insert('end', "$errorMessage"); # +Insert the Error into the listbox } # End Error Routine
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^5: Perl - TK - Listbox insertion problem
by choroba (Cardinal) on Apr 27, 2010 at 10:46 UTC |