[Bug 221113] readline function in perl does not correctly set $!