foreach (@stationsliste)
{
   print "Station ". $->('desc') . " wird abgefragt...\n";
      foreach (@wetterdaten)
        {