print "\n";
print "Welcome to the Perl Shell (psh Version $psh::VERSION)!\n";
print "\n";
print &psh::news;

$psh::prompt = '[\u@\h \W]{TESTING psh}$ ';
$psh::smart = 1;

