perl -e 'print $out=qx(ls );print "+" x 80 , "\n";print $out'