system("$cmd|more");
=anything
do A if terminated by press q
do B otherwise.
=cut