Je libo sledovat obsah poznámkových bloků? Nebo stav známek? Nebo počty příspěvků v diskusních fórech? S bashovým curl není nejmenší problém!

Níže je k dizpozici jednoduchý skript pro přihlášení do IS MU a čtení poznámkových bloků. Další úpravy jsou již asi na každém ke své vlastní potřebě.

#!/usr/bin/perl
use strict;
my $username = "123456";
my $userpass = "MOJEHESLO";
# otevřu dotaz a z načtené stránky odstraním konce řádků
my $soubor = `curl --insecure -u $username:$userpass https://is.muni.cz/auth/student/poznamkove_bloky_nahled.pl 2> /dev/null`;
$soubor =~ s/\n//g;
# najdu telo
$soubor =~ /<div id="aplikace">(.*?)<\/div/m;
$soubor = $1;
# koncove tagy zmenim v nove radky
$soubor =~ s/<\/(.*?)>/\n/g;# normalni tagy proste smazu
$soubor =~ s/<.*?>//g;print "$soubor\n";

Myslím, že pochopení je snadné a poúprava k vlastní chuti taktéž. Ještě ukázka čtení času poslední úpravy:

$soubor =~ m/(\d{1,2})\. (\d{1,2})\. (\d{4}) (\d{1,2})\:(\d{1,2})/;
print "$1 $2 $3 $4 $5\n";