|
|
| go ahead... be a heretic | |
| PerlMonks |
Re: Tk app to show the computers you are connecting toby TheoPetersen (Priest) |
| on Feb 13, 2001 at 18:58 UTC ( [id://58206]=note: print w/replies, xml ) | Need Help?? |
This is an archived low-energy page for bots and other anonmyous visitors. Please sign up if you are a human and want to interact.
Nice work. Runs fine on RedHat 6.x Column headers for the "Current connections" windows would be nice, for those who didn't write the app. Line 68: make that a parameter, or check for /etc/resolv.conf and get the value from there. Line 134: right. There's a classic blunder at line 143: check to see if the regexp actually matched before you use $4 elsewhere. At 157, you should check to see if $connlist[$i]{rip} is defined before using it as a hash element. Also, the () around an unless or if modifier aren't necessary. Line 218, assign a default value to $portnum to avoid another undefined value error. And so on. Some basic cleanup before posting is a nice thing, but it's a good start.
In Section
Craft
|
|
||||||||||||||||||||||||||||