The safest thing to do is probably to save your old STDERR and restore it afterwards:

{
    local (*SAVEERR);
    open SAVEERR ">&STDERR";
    # ... do your stuff
    open STDERR, ">&SAVEERR";
}
[download]

Also, take a look at perlopentut.