my $content = get($url); # other stuff... die "Could not write: $filename\n$!" unless open(my $fdOut, '>', $filename); binmode($fdOut); syswrite($fdOut, $content, length($content)); close($fdOut);