Soweit ist das ok.

new fängt typisch an mit:
my $class = shift;

die einzelnen Methoden mit:
my $self = shift;
Jetzt folgt das, was Du der Methode selbst übergeben hast.
Wenn Du nichts Sinnvolles hast, was die Methode zurückgibt, dann ist es immer $self.
Dann kannst Du so etwas wie $window->location()->href() oder kürzer $window->location->href bauen. Das hast Du sicher schon mal in JavaScript gesehen: window.location.href ... alles klar?

Achte etwas auf die Schreibweisen:
- Klassennamen, packagenamen so: SoEinSchoenerName
- Konstanten so: use constant SO_EIN_SCHOENER_NAME => 'name';
- my deklariert so: my ($so_ein_schoener_name, @so_ein_schoener_name, %so_ein_schoener_name);
- our deklariert so: our $VERSION;
- sub's so: sub so_ein_schoener_name { ...
- sub's als Objektmethoden außer new und DESTROY so: sub soEinSchoenerName { ...
Alle sub's und Methoden, die nur intern im Modul verwendet werden, bekommen ein _ vorangestellt.
Das ist soweit das Wesentliche. Perl ist es eigentlich egal aber wenn man Code veröffentlicht/austauscht, macht es Sinn sich an so etwas zu halten. Im Kamelbuch steht dann auch noch mehr dazu.\n\n

<!--EDIT|steffenw|1135195242-->