Perl Hash Join - Hash in String wandeln

[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