#!/usr/bin/perl

#
# pack.pm
#

package pack;

use strict;
use warnings;


sub version { print "Wert: ", $main::zahl; }

1;