did you print the \n because of the buffering? i'm only asking 'cause i think it's ugly (it's only an opinion).
if you did so, you can turn off buffering by setting $|. just do $| = 1;.