Imagebreite abfragen

[dobra]

Hallo,

Ich würde eine Abfrage brauchen, ob ein Bild (iimage auf Verzeichnisseiten) breiter als x Pixel ist.
if ($img <= x px) {Tabelle1 ausgeben}  else  { Tabelle2 ausgeben }

Beispiel, wozu ich das brauche:

bei dem Image 2. Zeile links (also der "else" Fall) soll der Text und Preis unter dem Bild ausgegeben werden

Beim googeln habe ich den Hinweis - und auch ein Script - gefunden, daß das mit dem Perl Modul "image::size" geht ?
(das Modul hat mir mein Hoster gerade installiert)

Ich kriege aber die Abfrage nicht in ssp-Format hin :'(
Kann mir da bitte jemand helfen?
(wäre schön, für gif, jpeg und png  -  notfalls gehts aber auch nur für jpeg)

mal wieder ein Nachtrag  ;)
eine Alternative wäre natürlich, wieder ein neues ben.def. Artikelfeld anzulegen, hier ein flag zu setzen und abzufragen, aber eine direkten Abfragemöglichkeit nach Image width/height könnte ich generell für die automatische Layoutanpassung auf verschiedenen Seiten verwenden....

[ahe]

Hallo dobra,

sollte in etwa so gehen:

Code [Auswählen] Expand

<!--spmacro:module(test)
sub myfunc {
    use Image::Size;
    my $img = "bild.gif";
    my ($x, $y) = imgsize($img);
    main::mprint("x=$x, y=$y");
}
-->

$img dann natürlich noch korrekt durch das zu untersuchende Bild ersetzen.

[dobra]

Hallo ahe,

Danke - funktioniert  ;D

aber nur online - lokal kommt Fehlermeldung:

This Error has occured:
parsing error 123-6 in GLOB(0x2553efc): Can't locate Image/Size.pm in @INC (@INC contains: C:/Programme/IBO-Internet-Software/ShopPilot-Enterprise3/site/lib C:/Programme/IBO-Internet-Software/ShopPilot-Enterprise3/lib . .) at (eval 53) line 3, <$file> line 25. BEGIN failed--compilation aborted at (eval 53) line 3, <$file> line 25.

[cru]

Hallo dobra,

das Modul müss auch lokal installiert werden.
Am einfachsten sollte es gehen, wenn Sie über "Start/Ausführen" "cmd" die Console öffnen und dort über cpan das Modul installieren.

Installieren mit:

Code [Auswählen] Expand


install Image::Size


Alle Fragen mit "yes" beantworten.
Sollte ein Fehler auftreten können Sie die Installation erneut mit:

Code [Auswählen] Expand


force install Image::Size


durchführen.

mfg
cru

[dobra]

Hallo cru,

Danke - bin momentan leider etwas im Stress und kann das erst Abend zu Hause versuchen.

[dobra]

geschafft  :D

Habe das Modul lokal installiert und es funktioniert jetzt auch mit LiveView - Danke cru!!!