Както с PHP, така и с Perl е възможно лесното използване на MySQL, благодарение на група от функции. За осъществяване на връзка с базата за данни е необходимо наличието на модула MySQL, който по принцип е инсталиран в основния пакет на Perl. Но за всеки случай повече информация и даунлоуд на този модул може да намерите на този адрес: http://search.cpan.org/search?module=Mysql

Като начало трябва всеки един скрипт да започва с използването на този модул

CODE

1	use Mysql;

Връзка с базата за данни

За осъществяване на връзката към базата за данни се използва следното:

CODE

1	$db = Mysql->connect($host, $database, $user, $password);

като променливата $db съдържа в себе си съответната връзка. Имате възможност за едновременна работа с няколко връзки, като за тази цел трябва да използвате други променливи и с тях да осъществите съответните връзки. Това е важно, защото $db е връзката към всички фукции, които ще изпълняваме от тук нататък.



Избиране на базата за данни

Избирането на базата за данни става по следния начин

CODE

1	$db->selectdb($database);

Тук отново се използва променливата $db, тъй като тя носи връзката към съответната база за данни. $database е името на нашата база за данни.


Изпълнение на заявка към базата за данни

Изпълнението на заявка към базата за данни се осъществява по следния начин:

CODE

1	$query = $db->query($sql_query);

$sql_query е низ съдържащ заявката към базата за данни, а $query съдържа идентификатора на заявката.


Извличане на данните от заявката

За извличането на данните от заявката ще разгледаме два начина

CODE

1	@array = $query->fetchrow;

Тази функция връща единични редове от заявката, които се запаметяват в масива @array, стартиращ от позиция 0. След като преминете масива чрез цикъл, то тогава ще може да извлечете цялата информация.

Пример:

CODE

1	while( @array = $query->fetchrow ) { .. }

Вторият начин е чрез запаметяването на резултатите в hash масив, където имената на полетата са ключове в масива.

CODE

1	%hash = $query->fetchhash;

Пример:

CODE

1 2 3 4

while (%hash = $query->fetchhash) {      print $hash{'Name'}; }

като Name е името на полето в таблицата.