--- a/Makefile.PL	Tue Dec 09 23:26:57 2008 +0100
+++ b/Makefile.PL	Tue Dec 16 16:08:43 2008 +0100
@@ -1,3 +1,6 @@
+# The source for this stuff could be found at the following place:
+# https://keller.schlittermann.de/hg/quancom
+
 use ExtUtils::MakeMaker;
 
 WriteMakefile (

--- a/examples/example	Tue Dec 09 23:26:57 2008 +0100
+++ b/examples/example	Tue Dec 16 16:08:43 2008 +0100
@@ -10,10 +10,12 @@
     my $q = new Quancom $ARGV[0];
 
     my $r;
-    $r = $q->cmd("WB0101FF");
+    # $r = $q->cmd("WB0101FF");
+    $r = $q->cmd("WB010001");	    # sollte(!) gehen
     print $r->error_message, "\n" if $r->error;
 
     print $r->ok;
     print $q->last_result->ok;
+
 }