How would I adapt the else print statement to use
HTTP::Status status_message($rc)?

TIA

drew
-- snip --
use LWP::Simple;

while (<>){
        if (get $_) {
            # url is ok
            print;
        } else {
            # couldn't get url
            print "\nAn error occured with $_\n";
        }
}
-- snip --

__________________________________________________
Do You Yahoo!?
Get personalized email addresses from Yahoo! Mail
http://personal.mail.yahoo.com/

Reply via email to