$_ = join '|', map {$_ ||= 'empty' }  split('\|',$_,-1);

##</code><code>##

 s/(?<=\|)\|/empty|/g;