note BrowserUk <blockquote><i>For the sake of maintainability though I think I will avoid using this crafty method.</i></blockquote> <p>It is not at all clear to me why you think it need be a maintenance problem. Just wrap it over in a function something like: <code> sub getWithStatus { my $url = shift; my $content; open my $RAM, '>', \$content; my $stdoutsaved = select; select *$RAM; my $status = getprint( $url ); select $stdoutsaved; close $RAM; return $status, $content; } ... my( $status, $content ) = getWithStatus( $url ); if( $status ne RC_OK ) { die "Get $url failed with HTTP status: $status"; } ... </code> <div class="pmsig"><div class="pmsig-171588"> <hr /> <font size=1 > <div>With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'</div> <div>Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.</div> <div>"Science is about questioning the status quo. Questioning authority". </div> <div>In the absence of evidence, opinion is indistinguishable from prejudice. <p align=right> [http://thebottomline.cpaaustralia.com.au/|RIP Neil Armstrong]</p></div> </font> </div></div>Social/div 996077 996095