Habe auch das Problem unter Win32;
ich denke mal, dass das restore nicht wirklich das tut, was es soll!
Falls du Win32 benutzt, ist wohl Term::Getch eine sehr gute alternative!