I am not sure I understand why you need qx().

If I understand your problem correctly, what you need is the backtick operator.

so what you need is:

$result = `AT $bch`;
print OUTPUT $result;
[download]