Opened by I.C.Wiener at 2004-01-26 19:50
User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn
2003-08-04
2145 Artikel
ModeratorIn + EditorIn
[quote=format_c,27.01.2004, 11:08]Ob die Datei da liegt wie er sie einbinden will kann man doch mit einem einfachen Kontrollscript zu kontrollieren.
...
[/quote]
Genau das funktioniert in diesem Fall nicht, da bei <link href="..."> eine (evtl. relative) URL angegeben wird und kein Pfad im Dateisystem. Und gerade darueber ist I.C.Wiener gestolpert. Da muesste also statt des "-e ..." eher ein "LWP::Simple::get ..." oder so stehen.
PS: Den ?:-Operator als if-Ersatz zu benutzen ist IMHO unschoen. Warum nicht so?
print (bedingung ? "OK" : "Nicht OK");
So wird der Operator als solcher benutzt und es ist noch weniger zu tippen. ;)
Code: (dl
)
1
2
3
4
5
6
7
8
#!/usr/bin/perl
use strict;
my $location = 'style.css';
print "Content-type: text/plain\n\n";
-e $location ? print "OK" : print "Nicht OK";
exit;
...
[/quote]
Genau das funktioniert in diesem Fall nicht, da bei <link href="..."> eine (evtl. relative) URL angegeben wird und kein Pfad im Dateisystem. Und gerade darueber ist I.C.Wiener gestolpert. Da muesste also statt des "-e ..." eher ein "LWP::Simple::get ..." oder so stehen.
PS: Den ?:-Operator als if-Ersatz zu benutzen ist IMHO unschoen. Warum nicht so?
print (bedingung ? "OK" : "Nicht OK");
So wird der Operator als solcher benutzt und es ist noch weniger zu tippen. ;)