use strict; use warnings; eval 'prasdasd $asd'; printf "nach eval [%s]\n", $@; my $a = 2; my $b = 0; eval { printf ("resultat: %s\n", $a/$b); }; printf "nach eval [%s]\n", $@;