From: gfx <gfuji@cpan.org>
Date: Tue, 9 Feb 2010 06:03:25 +0000 (+0900)
Subject: Update example/point.pl
X-Git-Tag: 0.50_01~16
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=commitdiff_plain;h=31e71b650102441dee8adb661b7ed808b8f4fd93

Update example/point.pl
---

diff --git a/example/point.pl b/example/point.pl
index d85df30..bb651e4 100644
--- a/example/point.pl
+++ b/example/point.pl
@@ -34,3 +34,7 @@ my $point3d = Point3D->new(x => 5, y => 42, z => -5);
 print "point1: ", $point1->dump();
 print "point2: ", $point2->dump();
 print "point3: ", $point3d->dump();
+
+print "point3d->clear()\n";
+$point3d->clear();
+print "point3: ", $point3d->dump();