Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask

Re: Tk app to show the computers you are connecting to

by TheoPetersen (Priest)
on Feb 13, 2001 at 23:58 UTC ( #58206=note: print w/replies, xml ) Need Help??

in reply to Tk app to show the computers you are connecting to

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.

Replies are listed 'Best First'.
Re: Re: Tk app to show the computers you are connecting to
by jepri (Parson) on Feb 14, 2001 at 16:37 UTC
    Thanks for the feedback, Theo. I updated it according to your comments. There's more to be done, but it's scratched my itch - it helps identify naughty sites to go in junkbuster.

    I didn't believe in evil until I dated it.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://58206]
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others wandering the Monastery: (6)
As of 2023-12-07 06:46 GMT
Find Nodes?
    Voting Booth?
    What's your preferred 'use VERSION' for new CPAN modules in 2023?

    Results (32 votes). Check out past polls.