Ein paar Anmerkungen:

*) "while" schreibt man klein
*) Das wird eine Endlosschleife, da die Bedingung immer wahr ist
*) Warum definierst Du eine Sub innerhalb der Schleife?
*) Wo wird die Verbindung zur Datenbank hergestellt?
*) Du solltest die ?-Schreibweise von DBI verwenden (wurde Dir schon 1000x gesagt)
*) Wenn Du eine WHERE-Bedingung setzt, werden zu 90% nicht alle Router durchlaufen (außer alle haben den gleichen Namen)