While it's true that no one here will do someone's homework for them, I don't think this particular post deserves to be brushed off so hastily.

SMA said, "If you can show me the right way to do it ,or give any idea, i think i could write it pretty fast." This doesn't sound to me like someone asking to have their project written for them. I see nothing unreasonable about someone asking for guidance with their homework. Telling someone to RTFM is often appropriate when people are asking about easily-found technical details, but manuals rarely help when you don't have a starting point. I see nothing wrong with telling folks to go look at module X, or read merlyn's article on Y, even if it is for someone's homework.

Just my $0.02.

I don't buy it. CPAN is not exactly a secret, especially to someone who has, according to his own admission "used Perl for years." If you're in a class part of your education isn't just writing, it's researching which means putting some level of personal effort into finding out where the answer may be without cutting to the chase and asking those that already know. It's certainly convenient for the student, though ultimately not as educational as doing the grunt work yourself.

It's kinda amusing seeing the reputation on my original node swing wildly up and down... I deliberately posted first so that I could say in a nice way what lots of other Monks would have said much less politely. The poster is new and doesn't need to be abused... I was trying to save him some abuse and I get beat up on instead.

Ah well... to each his own. :-D

Gary Blackburn
Trained Killer

Okay, this thread has inspired me to start a new project.

The project will be a keylogger written entirely in Perl. It needs to run on Linux and read keystrokes entered on the command line and in X. I've done searches both here and on CPAN for 'keylogger' and 'term' but didn't find anything relevant.

Any suggestions as to how I'd get started on this project? Thanks in advance for the replies :).

if u want to write a simple key logger in windows this would be how to do it

use feature ':5.10';
while(10) {
$input = <>; #this creats an infinite loop
last if $input eq "exit/n"; #exit loop when user presses exit then ent
+er
open(FILE, ">>log.txt");
print FILE $input;
}
close FILE;
[download]

I have to admit, when I first saw this thread, I was thinking script kiddie. This response adds a nice touch of humor to this thread as a very naive approach.

Thanks for the humor :)

--MidLifeXis

I guess that Term::Readkey would be where you want to look. But im really not that sure.

Yves / DeMerphq
---
Writing a good benchmark isnt as easy as it might look.