Code:

# Rls: Auto_Read_txt.tcl v1.0# Date: 27/04/10 # Coded by: doggo # Contact: #alt.binaries.inner-sanctum@EFNET ###############################bind pub n|n -lastline auto_req_read_procset pree_chan "#somewere" set req_file "/home/doggo/news/mysql/auto_req.txt" set insert_interval 1 #in secondsset auto_req_file_mod 0 ## Script Starts Here - DO NOT EDIT BELOW! ##proc auto_req_timer { } {    global insert_interval    auto_req_read_proc    if {[string match *auto_req_timer* [utimers]] != 1} {       utimer $insert_interval auto_req_timer    } } proc auto_req_read_proc { } {    global pree_chan req_file auto_req_file_mod    set file_mtime [file mtime $req_file]    set file_handle [open $req_file r]    set get_data [split [read $file_handle] "\n"]    close $file_handle    set last_line [join [lindex $get_data end]]    if {$last_line == ""} {       set last_line [join [lindex $get_data end-1]]    }    if {$auto_req_file_mod != $file_mtime} {       putquick "PRIVMSG $pree_chan :\00306$last_line"       set auto_req_file_mod $file_mtime    } }    if {[string match *auto_req_timer* [utimers]] != 1} {    utimer $insert_interval auto_req_timer }putlog "Auto_Read_txt.tcl v1.0 #alt.binaries.inner-sanctum"

Code:

[12:41pm] <doggo> -lastline[12:41pm] -tsara- this is the last line doggo :)