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