perl -e 'print "VARIABLEN SIND IMMER UNDEF!\n" if my $test eq undef'