2013-07-31T15:47:51 Wilsonaha,
Hast du zufällig ein beispielskrip?
Vielen Dank!
2013-07-31T16:42:49 hlubenowFrage an alle: Helfen oder lieber nicht?
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
#!/usr/bin/perl use warnings; use strict; # Please read: http://www.pool.ntp.org/de/use.html use Net::NTP; my %h = get_ntp_response("0.pool.ntp.org"); my @t = localtime($h{"Transmit Timestamp"}); my $hours = sprintf("%02d", $t[2]); my $minutes = sprintf("%02d", $t[1]); my $seconds = sprintf("%02d", $t[0]); print "$hours:$minutes:$seconds\n";
<a href="/wetter/berlin">29° C</a>
1 2
use Mojo::DOM; say Mojo::DOM->new('<a href="/wetter/berlin">29° C</a>')->at('a')->text;
2013-08-05T15:01:34 lichtkindja für quick and dirty test fälle geb ich topeg recht...
2013-08-05T15:43:19 lichtkindPerlish ist es auch, zu zeigen wo die Fallen bei den Regexes sind!tut ihm vielleicht auch etwas Übung in Regex gut. Es ist richtig das früher zu viel regex dazu verwendet wurde, teils weil es die guten module noch nicht gab, aber perlish bedeutet meiner meinung nach zu wissen wann man was tun kann.
2013-08-05T14:40:39 topegZudem ist dein Code nicht besonders zuverlässig. Aus den vorherigen Posts leite ich ab dass es dem Urheber um den Link geht der eine Temperatur anzeigt und auf die lokale url /wetter/berlin verweist. Das beachtest du gar nicht.
1 2
use Mojo::DOM; say Mojo::DOM->new('<a href="/wetter/berlin">29° C</a>')->at('a[href="/wetter/berlin"]')->text;
perl -Mojo -E 'say g("www.uhrzeit.org/atomuhr.php")->dom->at("#anzeige_zeit")->text'