Unnamed

 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License version 2 as
 # published by the Free Software Foundation.


bind pub - !bc pub:bc
proc pub:bc { nick uhost handle channel arg } {
        exec echo $arg | bc -l > bc.out &
        after 3000
        set pid_bc [ catch "exec pgrep bc" ]
        if { $pid_bc !=1 } {
            exec killall bc
            set out "plits!"
            
        }
        else{
            set fp [ open "bc.out" r ]
            set out [ read $fp ]
            close $fp
        }
        putserv "PRIVMSG $channel :$out"
}