Select Code to Download

    use Fcntl;
    fcntl($filehandle, F_GETFL, $packed_return_buffer)
        or die "can't fcntl F_GETFL: $!";

$cur_opts = fcntl( FH, &F_GETFL, 0 );