Digg StumbleUpon LinkedIn YouTube Flickr Facebook Twitter RSS Reset
Comments Off

Manipuler les attributs d’une classe à l’aide des méthodes ‘set’ et ‘get’

Your ads will be inserted here by

Easy AdSense.

Please go to the plugin admin page to paste your ad code.

classe, méthode, set
Download

#!/usr/local/bin/perl -w
 
package personne;
use strict;
 
sub Personne {
    my $self = { };
    bless($self);
 
    # Initialisation de deux attributs  de la classe
    $self->{Nom} = "";
    $self->{AGE}   = 0;
    return $self;
 
# Retourner le nom
sub get_Nom
{
    my $self = shift;
    return $self->{nom};
}
# Modifier le nom
sub set_Nom
{
    my $self      = shift;
    $self->{nom} = shift;
}
# Retourner l'âge
sub get_Age
{
    my $self = shift;
    return $self->{age};
}
# Modifier l'âge
sub set_Age
{
    my $self      = shift;
    $self->{age} = shift;
}
		}

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]

Comments are closed.

Sex Cams Movable Theme