In function `main':
`use' undeclared (first use in this function)
(Each undeclared identifier is reported only once
for each function it appears in.)
parse error before `DBI'
`$database' undeclared (first use in this function)
character constant too long
`$hostname' undeclared (first use in this function)
warning: multi-character character constant
`$mysqluser' undeclared (first use in this function)
character constant too long
`$mysqlpass' undeclared (first use in this function)
character constant too long
`$dbh' undeclared (first use in this function)
`DBI' undeclared (first use in this function)
`$sth' undeclared (first use in this function)
et qd je lance la compilation, la console me dit
#! /usr/bin/perl -w