#!/usr/bin/perl

use strict;
use eigene::control;

my $daten = "a";

print "daten: $daten\n";
print "-----\n";
&control::param("$daten");
print "daten: $daten\n";