Programmer une classe

Perl6 propose un méchanisme de classes relativement complêt et déjà disponible via le module Perl6::Classes .

Expliquer en détail ce type de programmation dépasse de très loin le cadre de ce livre et nécessiterait un ouvrage dédié. Nous nous contenterons de savoir qu'une classe peut contenir des method, des sub, des submethod et des has. Que les données peuvent être protégées, cachées ou publiques. Qu'il existe un système d'héritage via le mot clef is ...

L'exemple suivant donne une première idée de l'utilisation de cette classe :

use Perl6::Classes;

class MyClass {
        submethod BUILD($) {
                $.variable = shift or $.variable = 20;
        }
        method printWhile {
                for(my $i = 1; $i <= $.variable; $i++) {
                        print ".";
                }
                print "\n";
        }
}

my $class = MyClass -> new(40);
$class -> printWhile;