Gennemløb af hash

Jeg har en hash som indeholder værdier der er enten hashes, arrays eller strings. Arrays og hashes kan så igen indholde nye hashes, arrays eller strings...og det fortsætter derudaf.

Hvordan får jeg gennemløbet denne hash således at resultatet bliver en streng indholdende alle strings i en lang række efter hinanden. Rækkefølgen af strengene er ligegyldig.

Jeg ved at det er noget med at gennemløbe hashens indhold rekursivt, men hvordan gør man det?

Her er en lille starter:

sub get_strings
{
  my (%hash)=@_;
  my $string;

  return ($string);
}