Select Code to Download

sub cheat {
my $cheatfile = "/home/cheatsheets/$prefix.txt";
...
print $_;
}
}

my $counter = 0;
while($counter <= 1){
...
&cheat;
$session->exp->send("\r\n");
}

networks>
adslc -s -s 1________________________line status [card mode]
adslc -s -e 1________________________line errors [card mode]
networks>

networks>
adslc -s -s 1________________________line status [card mode]
                                                            adslc -s -
+e 1________________________line errors [card mode]
networks>

i.e.
line1
       line2
              line3