#################################################
sub sub_code {
    print "bin im sub_code mit Par. '$_[0]'", "\n";
    exit();
}
#################################################