('|'?0:1)==0

die if '|'

$SIG{PIPE}={$p++};END{$p==0}