Perhaps this (edit: undef $ppt;) just kills PP as opposed to shutdown/close?