# Put value part in default variable.
$_="HHH914\nEEE888\nLLL4258\nPPP8525";

# Search for newlines and replace with double pipes.
s/\n/||/g;

print "||$_||\n";

##</code><code>##

||HHH914||EEE888||LLL4258||PPP8525||