# !/usr/bin/perl

# Dieses Perl-Skript implementiert das Objekt objTest und nennt es objTestImp.

# Zuerst mssen wir die Objekt-Definitions-Datei anfordern, wie in
# Listing 1 gezeigt.
require "object.pm";

Jetzt das Objekt instanzieren und es objTestImp nennen
# Das wird "Hallo!" an STDOUT ausgeben
$objTestImp = new objTest;

# Jetzt zerstre das Objekt.
# Das wird "Tsch!" an STDOUT ausgeben
undef $objTestImp;

