Имеющиеся базы

Пример

use Msql;

my $db = Msql->connect;

my @databases = $db->listdbs;

print " Имеющиеся базы данных:\n\n" . join("\n",@databases);



Содержание  Назад  Вперед

---

---

---

---