This is probably more of an OS problem than a perl problem. That is, you first need to figure out how to determine which user is using your modem. Under a Unix-like system there are OS calls that can be made to figure this out (commands like fuser and ps), but I'm not sure what facilities exist for WinXP.

Secondly, you might be better off just patching your OS and software so the guy can't break in. You might have re-install Windows and all of your apps, but you would be solving a lot of problems all at once by making your system secure. And even if you do figure out the modem thing, what will prevent the hacker from creating other mischief if you don't close up the security hole that's allowing him into your box in the first place?

By the way, when you say "modem", are we talking about a telephone modem (and not a cable or DSL modem)? And is the hacker coming in through your broadband connection to use your telephone modem? to send spam?

In reply to Re: Using Perl to fight Spam by pc88mxer
in thread Using Perl to fight Spam by OldCog

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.