A Perl interactive shell program. This little bit of code allows you to test out one-liners and regular expressions to quickly see if they do what you think they do. Any error messages are echoed. Assignments become part of the execution environment so that you may assign on one line and test the variable's value on another.
Any line starting with a question mark is transformed into a print statement.
A previous line may be re-entered with the prompt still attached and it will be stripped off. This allows triple clicking to copy the line and re-execute it. This will be passed to eval which will then exit.