remove space delete from more prompt

diff --git a/dell-switch.pl b/dell-switch.pl
index 33f1d1d..a88b71b 100755 (executable)
--- a/dell-switch.pl
+++ b/dell-switch.pl
@@ -132,6 +132,8 @@ while() {
                send_pty " ";
        } elsif ( $buff =~ s{\Q--More-- or (q)uit\E}{} ) {
                send_pty " ";
+       } elsif ( $buff =~ s{\r\s{18}\r}{} ) {
+               # strip spaces delete after more prompt
        } elsif ( $buff =~ s{\e\[0m\s*\r\s+\r}{} ) {
                # nop
        } elsif ( $buff =~ m/^[\r\n]+[\w\-]+>$/ ) {