#!/usr/bin/perl
use warnings;
use strict;

our $AUTOLOAD;
sub AUTOLOAD {
    $" = ', ';
    print "Es wurde [$AUTOLOAD] mit den Parametern [@_] aufgerufen\n";
}

hallo();
welt( 'foo' );
wie( 'bar', 'shoe' );