my $result = eval $param; die "eval failed: $@" unless defined $result; print $result;