title image


Smiley Re: Bild aus web laden und unter neuem Namen speichern.
getstore("http://www.wagshurst.de/acherncam.jpg", "C:\bild_neu.jpg") or die "Fehler: $!";

getstore gibt allerdings den HTTP Response code zurück, und keinen unwahren Wert, wenn etwas nicht geklappt hat.





#!/usr/bin/perl -w

use strict;

use warnings;

use LWP::Simple;

use HTTP::Status;



my $source = 'http://...';

my $dest = 'C:/bild_neu.jpg';



my $resp = getstore($source, $dest);

die status_message($resp) unless (is_success($resp));


Doron



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: