print "\c[[K";
# or
print "\e[K";