#!/usr/bin/perl -n
#
# psh - perl shell

chomp;
printf "%s = %s\n", $_, eval

# to debug, just perl -de 0

# to wrap GNU readline library, see rlwrap(1) - e.g.
# rlwrap -c -D2 perl -ne 'chomp; printf "%s = %s\n", $_, eval'