Όμως, αυτό είναι ένα one-liner σε bash και perl. Ό,τι δεν λύνεται, το κάνουμε με perl scripting.
- Κώδικας: Επιλογή όλων
wget -q 'http://www.metar.gr/?option=com_jumi&fileid=12&Itemid=73&station=1353' -O - | perl -e '@in={}; $i=1;while (<>) { if (m#(.*°C)#i) { $in[$i]=$1; $i+=1; }; }; print("Η Θερμοκρασία είναι: $in[1] Βαθμούς Κελσίου\nμε Μέγιστη θερμοκρασία $in[2] Βαθμούς Κελσίου\nκαι Ελάχιστη: $in[3] Βαθμούς Κελσίου\n");' > myfile.txt
cat myfile.txt
Τώρα να σου το εξηγήσω κομματάκι δύσκολο. Η perl είναι γλώσσα προγραμματισμού αρκετά ικανή για μετατροπή και επεξεργασία κειμένου. Μπορώ μόνο να στο σπάσω σε γραμμές:
- Κώδικας: Επιλογή όλων
wget -q 'http://www.metar.gr/?option=com_jumi&fileid=12&Itemid=73&station=1353' -O - | perl -e '
@in={};
$i=1;
while (<>) {
if (m#(.*°C)#i) {
$in[$i]=$1;
$i+=1;
};
};
print("Η Θερμοκρασία είναι: $in[1] Βαθμούς Κελσίου\nμε Μέγιστη θερμοκρασία $in[2] Βαθμούς Κελσίου\nκαι Ελάχιστη: $in[3] Βαθμούς Κελσίου\n");' > myfile.txt
