You don't want to hardcode them. At the least you want to use a module like Term::Cap to lookup the specific sequences by a capability name; more likely you'd want to use something like Curses which will give you a higher level drawing API and handle the grunt work for you.