Δημοσιεύτηκε: 07 Οκτ 2010, 11:09
jim.christou έγραψε:διευθυνση ανεμου αν πας το ποντικι πανω απο το γραμμα εμφανιζει στο tooltip
Φυσικά, αν βρεις το κατάλληλο τρόπο να τα ξεχωρίσεις από το υπόλοιπο κείμενο:
έγραψε:<table width="40" height="40" border="0" cellpadding="0" cellspacing="0" align="center"><tr><td width="40" height="40" align="center" style="background-image: url('/000/icons/BF/3.gif'); background-repeat:no-repeat;"><a href="#" title="Ανατολικός Βορειοανατολικός - 3 BF"><img border="0" src="/000/icons/WIND/67.gif" width="40" height="40"></a></td></tr></table>
Μια πρώτη γεύση από perl εδώ: http://www.perl.com/pub/2000/10/begperl1.html - http://www.comp.leeds.ac.uk/Perl/start.html
Τα regular expressions επεξηγούνται εδώ: http://www.regular-expressions.info/ -- http://perldoc.perl.org/perlre.html
- Κώδικας: Επιλογή όλων
wget -q 'http://www.metar.gr/?option=com_jumi&fileid=12&Itemid=73&station=1353' -O - | perl -e '
@in={};
@wind={};
$i=1;
while (<>) {
if (m#(.*) °C#i) {
$in[$i]=$1;
$i+=1;
} elsif (m#(.*) km/h - (.*) Bf#i) {
$wind[1]=$1;
$wind[2]=$2;
};
};
print("Η Θερμοκρασία είναι: $in[1] Βαθμούς Κελσίου\nμε Μέγιστη θερμοκρασία $in[2] Βαθμούς Κελσίου\nκαι Ελάχιστη: $in[3] Βαθμούς Κελσίου\n");
print("$wind[1] χιλιόμετρα την ώρα ή αλλιώς $wind[2] Μποφόρ\n");' > myfile.txt