variable: Introduce and use new function var_get_encoding().
[pspp] / perl-module / t /
drwxr-xr-x   ..
-rw-r--r-- 13312 Pspp.t