An interactive Netezza shell written in Perl