print ("\033[2;5H");


##</code><code>##

$columns = 5;
print ("\033[2;${columns}H");


##</code><code>##

$a = 5;
print ("\033[3;${a}HStart Here $a");
print ("\033[4;${$a+=10}HEnd Here $a\n");


##</code><code>##

    Start Here 4
End Here 14