Speicher problem mit perl

[Siechfred]

Hell-O!

offensichtlich wird eine leere Liste nicht gesplitet

Ja, wie in der Doku zu split nachzulesen ist:

"By default, empty leading fields are preserved, and empty trailing ones are deleted."

Ein möglicher Ansatz wäre ein Dummy-Zeichen anzufügen:

use strict;  
use warnings;  
use CGI::Carp qw(fatalsToBrowser);  
use Data::Dumper;  
  
my $string = '||1|2||3||4|||';  
$string .= "\n";  
my @liste = split /\|/, $string;  
pop @liste;  
print Dumper @liste;

Natürlich muss man dann noch via pop das Dummy-Zeichen aus der Ergebnisliste entfernen.

Siechfred