En-tête typique d'un script :

#!/user/local/perl.5.8/bin/perl5.8.7
use strict;
use warnings;

Et avec DBI :

#!/user/local/perl.5.8/bin/perl5.8.7
use strict;
use warnings;
use DBI;
use DBD::Oracle;

my $utilisateur = 'xxx';
my $motdepasse = 'xxx';

my $dbconnect = DBI->connect('DBI:Oracle:',$utilisateur,$motdepasse);
...
$dbconnect->disconnect();

Pour insérer un commentaire : #

On peut aussi faire comme ceci :

#!/user/local/perl.5.8/bin/perl5.8.7

use strict;
use warnings;

use lib "/user/local/loris/filip/MesFonctions";
use Konekto qw(konekto uzanto pasvorto);
use DBI;
use DBD::Oracle;

my $dbconnect = DBI->connect($Konekto::konekto,$Konekto::uzanto,$Konekto::pasvorto);
...
$dbconnect->disconnect();

Si nécessaire, faire chmod 700 <fichier>.

Divers

* Il y a deux version de perl installées sur notre serveur :

Quand on taper perl -v, on voit que c'est la version 5.6.1 qui est lancée.

L'adresse /opt/perl est un raccourci vers /user/local/perl.5.8

Pour avoir la liste des modules installés : /user/local/perl/lib/5.6.1

Pour lister les variables d'environnement de perl : /user/local/perl/bin/perl -e "print qq(@INC)"
Réponse : /opt/perl/lib/5.6.1/ ...
Mais ce répertoire n'existe pas !
Ce qui existe, c'est /opt/perl/lib/5.8.7/

* Pour rediriger les messages d'erreur vers un fichier :

open STDERR, '>fichier.log';
...
close STDERR;