print BT "Lokale Zeit: ", scalar localtime($localtime), "\n\n";