erzeuge in dem foreach mittels my eine lexikalische variable.diese wuerde am ende des foreach-blockes nicht mehr existieren (da der sog. referenzzaehler an dieser stelle dekrementiert wird, und wenn er 0 ist, ist die variable nicht mehr ansprechbar). wenn du sie aber in der sub referenzierst (also benutzt, nicht im sinne einer perl referenz), dann bleibt sie erhalten, solange die sub ansprechbar ist.