$cmd = 'disable port p1/1/0\ny';

##</code><code>##

# pseudocode
$realprompt = 'rtrname#';
$quesprompt = '[y/n]?';
$conn->prompt($quesprompt);
$conn->cmd('disable port p1/1/1');  # and wait for quesprompt
$conn->prompt($realprompt);     # reset prompt
$conn->cmd('y');              # and wait for realprompt