ftp.madoka.org/2014.12.ftp.madoka.org.tar/ftp.madoka.org/pub/plum/1.x/plum12.lzh/plum12/privconv.plm

Text File | 1997-09-25 | 198b | 12 lines

package privconv;

$_ = 'privconv';

sub ss_privmsg {
  local($serverno, $prefix, $cmd, $chan, $msg) = @_;
  if ($msg =~ /^[\w\d]+$/) {
    $msg .= ' ';
  }
  return ($prefix, $cmd, $chan, $msg);
}