Expose the current directory and script directory to perlpp code

[cxw42]

Inside a file being processed by perlpp, I would like to be able to access the current directory, the input filename with directory, and the directory perlpp is running from.