405
405
DO $$ open my $fh, "</nonesuch"; $$ LANGUAGE plperl;
407
407
-- check that eval is allowed and eval'd restricted ops are caught
410
410
-- check that compiling do (dofile opcode) is allowed
411
411
-- but that executing it for a file not already loaded (via require) dies