my @data = split(/_/, $sessioncut);
my @aricles;
for(my $i=0; i < @data, i+=3 ){
push @article, @data[$i .. $i+2];
}
oder besser so.
my @data = split(/_/, $sessioncut);
my @aricles;
for(my $i=0; i < @data, i+=3 ){
push @articles, [ @data[$i .. $i+2] ];
}
oder so
my @data = split(/_/, $sessioncut);
my @aricles;
for(my $i=0; i < @data, i+=3 ){
push @articles, {
amount => $data[$i],
article => $data[$i+1]
prize => $data[$i+2]
};
~~~}
mfg Beat
--
><o(((°> ><o(((°>
<°)))o>< ><o(((°>o
Der Valigator leibt diese Fische