Korrektur

[Beat]

[code lang=perl]sub joinMe {
     my ( $self, $options ) = @_;
     my $joined;
     foreach my $k (keys %{$options}){
         $joined .= join("=",$options->{$k});

$joined .= join("=",@{ $options->{$k} } );

}
     return $joined;
}

mfg Beat

War leider zu schnell

$options->{$k} verweist ja auf eine hashreferenz.
da braucht es dann

foreach{ sort keys %{ $options->{$k} } }{
   $joined .= $_ .'='. $options->{$k}{$_} . ';'
}

mfg Beat
--

<o(((°>           ><o(((°>

<°)))o><                     ><o(((°>o
Der Valigator leibt diese Fische