Data Extraction from txt file

[Atif1]

Dear Fellows,

I need to extract Month day time user and password from the log file provided below.

Aug 27 03:56:32 sktmail popper[12994]: (v4.0.Cool POP login by user "assad" PASS=assad 192.168.2.1 192.168.1.1 [pop_log.c:247]
Aug 27 03:59:33 sktmail popper[13020]: (v4.0.Cool POP login by user "tariq" PASS=tariq 192.168.2.1 192.168.1.1 [pop_log.c:247]
Aug 27 04:50:33 sktmail popper[13020]: (v4.0.Cool POP login by user "james" PASS=james 192.168.2.1 192.168.1.1 [pop_log.c:247]
 

[ganthimathi]

open(FR,"sam.txt");
print "\nMonth \t Date \t Time\n";
while ($l = <FR>) {
    @t = split(' ',$l);
    print "$t[0] \t $t[1] \t $t[2]\n";
}
close(FR);
 

sam.txt::

Aug 27 03:56:32 sktmail popper[12994]: (v4.0.Cool POP login by user "assad" PASS=assad 192.168.2.1 192.168.1.1 [pop_log.c:247]
Aug 27 03:59:33 sktmail popper[13020]: (v4.0.Cool POP login by user "tariq" PASS=tariq 192.168.2.1 192.168.1.1 [pop_log.c:247]
Aug 27 04:50:33 sktmail popper[13020]: (v4.0.Cool POP login by user "james" PASS=james 192.168.2.1 192.168.1.1 [pop_log.c:247]
 

[KevinADC]

comments removed.............

[numberwhun]

ganthimathi,

really. This is a learning forum. You, me, nor any of the others here are going to learn anything if code is just supplied at the posters request. This is NOT a code writing service. I personally learn by doing and don't want someone writing my whole program for me. Besides, there are a lot of homework questions that get posted here and again, doing it for them doesn't help them out. Please, make sure the user posts there code first and then troubleshoot it.

Also, if you post code, please use code tags. This does not consist of of the word "code:" before you write the code. For an example of code tags, please see the "REPLY GUIDELINES" next to the message window when posting.

Regards,

Jeff