Exemple de création d’un fichier de base de données DBM portable

Exemple de création d'un fichier de base de données DBM portable
#!/usr/bin/perl
 
use strict;
use warnings;
use AnyDBM_File;
use POSIX;
my %dbm;
my $fichier_BD="c:/B

base de données, fichier
{filelink=14648}

#!/usr/bin/perl
 
use strict;
use warnings;
use AnyDBM_File;
use POSIX;
my %dbm;
my $fichier_BD="c:/BD/Etudiant.dbm";      #Le nom de la Base de données
 
tie (%dbm, 'AnyDBM_File', $fichier_BD, O_CREAT|O_RDWR, 0644);
	unless (tied %dbm)
	{
    printf ("Impossible de créer la Base de donnée:%s $!",$fichier_BD );
	}
 	else
	{
    	$dbm{'ID'}=1;
    	$dbm{'Nom'}="sakoba";
   		$dbm{'Prenom'}="Steve";
   		foreach (sort keys %dbm)
     	{
        print "$_ => $dbm{$_}";
    	}
    untie %dbm;
	}

Livres sur ce sujet

[amazon_image id=”2841773698″ link=”true” target=”_blank” size=”medium” ]De l’art de programmer en Perl[/amazon_image][amazon_image id=”2914010729″ link=”true” target=”_blank” size=”medium” ]Perl pour l’impatient[/amazon_image][amazon_image id=”2841771407″ link=”true” target=”_blank” size=”medium” ]Programmation en Perl, 3ème édition[/amazon_image][amazon_image id=”B005ELPHNA” link=”true” target=”_blank” size=”medium” ]Perl moderne: L’essentiel des pratiques actuelles[/amazon_image][amazon_image id=”2914010656″ link=”true” target=”_blank” size=”medium” ]Les expressions régulières par l’exemple[/amazon_image][amazon_image id=”2914010869″ link=”true” target=”_blank” size=”medium” ]Les meilleures bibliothèques pour Perl[/amazon_image]

Be the first to leave a comment. Don’t be shy.

Join the Discussion

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>