Results 1 to 1 of 1
dear all,
i used fedora core 2 kernel 2.6.5-1 i358
i want to view and read log at directory at /var/log/samba/
there are two files :
smbd.log and nmbd.log
and ...
- 09-30-2007 #1Just Joined!
- Join Date
- Mar 2007
- Posts
- 4
[perl] analysis log samba with regex
dear all,
i used fedora core 2 kernel 2.6.5-1 i358
i want to view and read log at directory at /var/log/samba/
there are two files :
smbd.log and nmbd.log
and i use perl to do that.
but,
my script read smbd.log :
#!/usr/bin/perl
#skrip for view file smbd
#kemudian disimpan di listsamba2.txt
open(FILEPASWD,"/var/log/samba/smbd.log") ||
die("cannot openned ");
open(LISTUSER,">listsamba2.txt");
print LISTUSER "date and time\t\t||\t\tdescription\n";
print LISTUSER "---------------\t\t--------------------\n";
while (<FILEPASWD>){
$line=$_;
@users = split(/:/,$line);
print LISTUSER "$users[0]\n";
}
close FILEPASWD;
close LISTUSER;
and i run this script , i found :
listsamba2.txt :
date and time || description
--------------- --------------------
[2007/09/29 22
creating lame upcase table
[2007/09/29 22
creating lame lowcase table
[2007/09/29 22
smbd version 3.0.3-5 started.
Copyright Andrew Tridgell and the Samba Team 1992-2004
[2007/09/29 22
creating lame upcase table
[2007/09/29 22
creating lame lowcase table
[2007/09/29 22
smbd version 3.0.3-5 started.
Copyright Andrew Tridgell and the Samba Team 1992-2004
but i get some problem, that is not regular arranged
some body can help me to solve that problems
thanks


Reply With Quote