On Thu, 12 Feb 2015 14:09:00 -0500
Kevin A. McGrail wrote:

> On 2/11/2015 7:25 PM, listsb-spamassas...@bitrate.net wrote:
> > i hope another solicitation for this help request is ok.
> 
> It's ok.
> 
> Overall, I agree.  I tested on a devel box and running sa-compile
> does have an rm line but did leave these files listed below.

sa-compile uses a temporary directory, the files (which start with "use
bytes") appear to be from Plugin/BodyRuleBaseExtractor.pm:


  my ($tmpf, $tmpfh) = Mail::SpamAssassin::Util::secure_tmpfile();
  $tmpfh  or die "failed to create a temporary file";
  untaint_var(\$tmpf);

  print $tmpfh "use bytes; m{" . $rule . "}" . $mods
    or die "error writing to $tmpf: $!";
  close $tmpfh  or die "error closing $tmpf: $!";

  my $perl = $self->get_perl();
  local *IN;
  open (IN, "$perl -c -Mre=debug $tmpf 2>&1 |")
    or die "cannot run $perl: ".exit_status_str($?,$!);

  my($inbuf,$nread,$fullstr); $fullstr = '';
  while ( $nread=read(IN,$inbuf,16384) ) { $fullstr .= $inbuf }
  defined $nread  or die "error reading from pipe: $!";

  close IN      or die "error closing pipe: $!";
  unlink $tmpf  or die "cannot unlink $tmpf: $!";
  defined $fullstr  or warn "empty result from a pipe";


I had some in /tmp, but  I'm not seeing any new ones when I run
sa-compile.

Reply via email to