PK85733: Clearquest perl scripts give failure errors when parsing if ther e is no return value of '1' in the script

APAR status

• Closed as program error.

Error description

• Clearquest perl scripts give errors when parsing if they don't h
  ave a return value of '1' .
  
  Perl hooks are parsed like modules. We use eval_sv which is simi
  lar to how Perl itself parses modules included by 'require' or '
  use'. Just as with Perl modules, the last result in the script b
  eing parsed is returned by the eval_sv. It is customary to put '
  1;' at the end of the module file so that the last result return
  ed is '1', indicating success.  If a hook/script doesn't return
  1, clearquest will consider it a parsing failure and will give o
  ut an error about hook failure.
  

Local fix

Problem summary

• Perl parsing could return an error if certain Perl code was
  at the end of the global script.  The solution is to change
  ClearQuest so that it ends global scripts with "1;" which is
  the standard practice for all Perl modules.
  

Problem conclusion

• A fix is available in ClearQuest 7.0.0.8 and 7.0.1.7.
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

Fix information

• Fixed component name

  CLRQUEST MSITE

• Fixed component ID

  5724G3700

Applicable component levels

• R701 PSN

     UP