my @array=split /\s*\n\s*/, <<'EOL';
hallo
wieviel
Betrag Euro
kostet
die welt
...
EOL

print join "|",@array;