Bug or Customization?

System

IWHOME/iw-perl/lib/perl5/site_perl/5.005/TeamSite/PT/iwov_xslt.pm contains the following code around line 373:

my $lc_xsl_file = $iw_parser->utf8_to_osenc( $xsl_file );
system "echo cp $lc_xsl_file $tmp_xsl >> /tmp/peek";
copy($lc_xsl_file, $tmp_xsl)

The system line seems like a debugging statement. I don't know if this was inserted by a consultant here or if this was released by Interwoven. Permission issues on the temp file can cause the append to fail, which causes TPL compilation to generate output such as:

sh: /tmp/peek: cannot create

Since the custom generation process interprets any output of a TPL as error, this is recorded as an error.

Can someone check their version of this file (iwserver: 5.5.2 Build 17976 Interwoven 20030323 on Solaris) and see if it has this command? I don't want to remove it on the dev server if this problem is going to reappear in production (so I would want Interwoven to remove it), but I also don't want to change the generate process to ignore this specific bug.

Thanks,

-John