 gucken ob bild exisitert
|
Seitenanfang |
| hallo.. habe paar hundert ordner mit Foto(1).jpg
Foto(2).jpg
Foto(3).jpg
Foto(4).jpg
Foto(5).jpg
... Teilweise bis mehr als Foto(1000) dann habe ich ein script gehabt, welches geprüft hat. ob Foto(1) exisitiert, wenn ja es auf eine seite stellt und eins dazu zählt, also nun guckt ob Foto(2) besteht, wenn ja, hat es das auf die seite gestellt, wenn nein abgebrochen... solange bis alle bilder auf der seite waren.
die fotos waren auf dem selben server wie das perl script, deshalb habe ich die prüfung in einer schleife mit -e gemacht. jetzt sind die bilder auf einem anderen server. -e funktioniert ja nur mit absoluten pfaden soweit ich weiß. wie kann ich jetzt gucken ob es existiert? habe es mit:
my $tbild = '';
my $tbildu = "http://www.addy.de/ordner/Foto($pn).jpg";
use LWP::Simple;
$tbild = get($tbildu);
probiert. aber da nun jedes bild geöffnet wird, dauert die ausführung bei übe 1000 bildern zieeeemlich lange, bei -e nur eine sekunde. was kann ich machen? danke
Datum: 18.11.2004-17:31
|
re: gucken ob bild exisitert
|
Seitenanfang |
| naja, du könntest Net::FTP benutzen und die verzeichnis-listings durchgehen, das geht mit sicherheit schneller, als für jedes bild einen einzelnen request zu machen (noch dazu get, hier sollte head vollkommen reichen, du brauchst das bild ja nicht, sondern nur den status-header).
Datum: 18.11.2004-22:34
|
re: gucken ob bild exisitert
|
Seitenanfang |
| wie mach ich das mit dem header?
Datum: 18.11.2004-22:42
|
re: gucken ob bild exisitert
|
Seitenanfang |
| http://search.cpan.org/~gaas/libwww-perl-5.801/lib/LWP/Simple.pm [quote]
head($url)
Get document headers. Returns the following 5 values if successful: ($content_type, $document_length, $modified_time, $expires, $server) Returns an empty list if it fails. In scalar context returns TRUE if successful.
[/quote]
Datum: 18.11.2004-23:37
|
re: gucken ob bild exisitert
|
Seitenanfang |
| was überträgt das wenigste ode rmit was würde es am schnellsten gehen? danke!
Datum: 18.11.2004-23:40
|
re: gucken ob bild exisitert
|
Seitenanfang |
| per ftp mit Net::FTP, siehe dazu search.cpan.org
Datum: 19.11.2004-01:19
|
