$code = 'print "Hello, World!\n"'; $coderef = eval "sub { $code }"; $coderef->(); #### 2;0 juerd@ouranos:~$ perl -e'undef christmas' Segmentation fault 2;139 juerd@ouranos:~$