abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
AbcLinuxu hledá autory!
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
    dnes 04:00 | Zajímavý článek

    Nevidomý uživatel Linuxu v blogu upozornil na tristní stav přístupnosti na linuxovém desktopu (část první, druhá, závěr), přičemž stížnosti jsou podobné jako v roce 2022. Vyvolal bouřlivou odezvu. Následně např. Georges Stavracas shrnul situaci v GNOME. Debata o jiném aspektu přístupnosti, emulaci vstupu pod Waylandem, také proběhla na Redditu.

    Fluttershy, yay! | Komentářů: 0
    dnes 03:00 | Komunita

    DevConf.CZ 2025, tj. open source komunitní konference sponzorovaná společností Red Hat, proběhne od 12. do 14. června v Brně na FIT VUT. Publikován byl program a spuštěna byla registrace.

    Ladislav Hagara | Komentářů: 0
    včera 18:22 | Nová verze

    Byla vydána nová major verze 28.0 programovacího jazyka Erlang (Wikipedie) a související platformy OTP (Open Telecom Platform, Wikipedie). Přehled novinek v příspěvku na blogu.

    Ladislav Hagara | Komentářů: 0
    včera 13:11 | Zajímavý článek

    Český telekomunikační úřad zveřejnil Výroční zprávu za rok 2024 (pdf), kde shrnuje své aktivity v loňském roce a přináší i základní popis situace na trhu. Celkový objem přenesených mobilních dat za rok 2024 dosáhl dle odhadu hodnoty přibližně 1,73 tis. PB a jeho meziroční nárůst činí zhruba 30 %. Průměrná měsíční spotřeba dat na datovou SIM kartu odhadem dosáhla 12,5 GB – v předchozím roce šlo o 9,8 GB.

    Ladislav Hagara | Komentářů: 6
    včera 12:33 | IT novinky

    Z novinek představených na Google I/O 2025: Přehledy od AI (AI Overviews) se rozšiřují do dalších zemí. Užitečné, syntetizované přehledy od generativní AI jsou nově k dispozici i českým uživatelům Vyhledávače.

    Ladislav Hagara | Komentářů: 0
    včera 11:44 | IT novinky

    Šestice firem označovaných jako „MAMAAN“ – tedy Meta (Facebook, Instagram), Alphabet (Google), Microsoft, Apple, Amazon a Netflix – je zodpovědná za více než padesát procent světového internetového provozu. Dalšími velkými hráči jsou TikTok a Disney+. Společně tak zásadně určují podobu digitálního prostředí, spotřebitelského chování i budoucích trendů v oblasti technologií. I přesto, že se podíl těchto gigantů od roku 2023 o něco snížil, jejich dominantní postavení zvyšuje volání po regulaci.

    Ladislav Hagara | Komentářů: 4
    včera 11:33 | IT novinky

    Evropská komise (EK) navrhuje zavést plošný poplatek ve výši dvou eur (zhruba 50 Kč) za každý malý balík vstupující do Evropské unie. Poplatek se má týkat balíků v hodnotě do 150 eur (zhruba 3700 Kč), které v EU nepodléhají clu. V loňském roce bylo do EU doručeno kolem 4,6 miliardy takovýchto balíků. Poplatek má krýt náklady na kontroly rostoucího počtu zásilek levného zboží, které pochází především z Číny.

    Ladislav Hagara | Komentářů: 16
    20.5. 18:11 | IT novinky

    Dnes a zítra probíhá vývojářská konference Google I/O 2025. Sledovat lze na YouTube a na síti 𝕏 (#GoogleIO).

    Ladislav Hagara | Komentářů: 0
    20.5. 15:22 | Komunita

    V Bostonu probíhá konference Red Hat Summit 2025. Vybrané přednášky lze sledovat na YouTube. Dění lze sledovat na síti 𝕏 (#RHSummit).

    Ladislav Hagara | Komentářů: 0
    20.5. 15:00 | Nová verze

    Společnost Red Hat oficiálně oznámila vydání Red Hat Enterprise Linuxu 10. Vedle nových vlastností přináší také aktualizaci ovladačů a předběžné ukázky budoucích technologií. Podrobnosti v poznámkách k vydání.

    Ladislav Hagara | Komentářů: 6
    Jaký je váš oblíbený skriptovací jazyk?
     (56%)
     (27%)
     (8%)
     (2%)
     (0%)
     (0%)
     (6%)
    Celkem 62 hlasů
     Komentářů: 5, poslední 20.5. 20:57
    Rozcestník

    ADSL FUP v Perlu (Radiokomunikace)

    29.8.2007 19:28 | Přečteno: 1441× | poslední úprava: 31.1.2008 22:54

    Uživatelům ADSL s FUP od Českých radiokomunikací by se mohl hodit script, který se připojí na FUP portál a stáhne a vypíše kolik dat je tento měsíc přeneseno a kolik zbývá.

    Informace vypisuje na příkazové řádce a je napsaný v Perlu. Tady je:

    1. #!/usr/bin/perl -w
    2. # 2007-08-29 Premek Vyhnal <premysl.vyhnal gmail.com> (Public domain)
    3.  
    4. use LWP::UserAgent;
    5.  
    6. # NASTAVENI
    7. # telefonni cislo
    8. $tel = 000000000;
    9. # heslo (defaultni je cislo smlouvy)
    10. $pass = 00000000;
    11.  
    12. $ua = LWP::UserAgent->new;
    13. $ua->agent(""); # User agent - identifikace "prohlizece"
    14. $ua->cookie_jar({}); # zapnout cookies
    15. # odeslat prihlasovaci formular pomoci POST
    16. $req = HTTP::Request->new(POST => "https://fup.radiokomunikace.cz/index.php");
    17. $req->content_type("application/x-www-form-urlencoded");
    18. $req->content("action=login&user_name=$tel\@bluetone.adsl&user_password=$pass");
    19. $ua->request($req);
    20. $res = $ua->get("https://fup.radiokomunikace.cz/main.php");
    21. if ($res->is_success) { $_ = $res->content;}
    22. else { die $res->status_line, "\n"; } # skoncit v pripade chyby
    23.  
    24. # ukoncit v pripade spatneho jmena/hesla
    25. die "Neplatne prihlasovaci udaje.\n" if(m/(Va.e p..hl..en. do aplikace nen. platn.)/);
    26.  
    27. ($perc) = m/<span id="progr">([.\d]+) %<\/span>/;
    28. ($limit) = m/FUP limit: ([,\d]+) GB<br \/>/;
    29. ($sezrano, $smgb) = m/Tento m.s.c: ([,\d]+) (\w)B<br \/>/;
    30. ($zbyva, $zmgb) = m/Do p.ekro.en. zb.v.: ([,\d]+) (\w)B/;
    31.  
    32. s/,/./ foreach ($limit,$sezrano,$zbyva);
    33.  
    34. @cas = localtime(time);
    35. ($den,$mesic,$rok) = ($cas[3],$cas[4]+1,$cas[5]+1900);
    36. # pocet dnu v tomto mesici
    37. @dny= qw( 31 28 31 30 31 30 31 31 30 31 30 31 );
    38. $dnu = $dny[$mesic-1];
    39. $dnu = 29 if ($mesic==2 and $rok%4==0 && $rok%100==0 || $rok%400==0);
    40. $zbyvadnu = $dnu-$den+1; # dnu do konce mesice (vcetne dneska)
    41.  
    42. print "
    43. Limit: $limit GB
    44. ".int(($limit/$dnu)*100)/100 ." GB/den
    45.  
    46. Spotrebovano: $sezrano ".$smgb."B
    47. $perc %
    48. ".int(($sezrano/$den)*100)/100 ." ".$smgb."B/den
    49.  
    50. Zbyva: $zbyva ".$zmgb."B
    51. $zbyvadnu dnu
    52. ".int(($zbyva/$zbyvadnu)*100)/100 ." ".$zmgb."B/den
    53. ";

    Použití:

    1. Uložit do souboru pod libovolným jménem např. někam do /usr/bin/
    2. Na řádcích 8 a 10 vyplnit své telefonní číslo a heslo na fup portál - pokud jste ho neněnili je to číslo smlouvy
    3. Nastavit práva pro spouštění (chmod +x jmenosouboru)
    4. Pro spuštění napište jeho jméno na příkazové řádce

    Script vypíše například:

    Limit:        24.00 GB
                  0.8 GB/den
    
    Spotrebovano: 4.96 MB
                  0 %
                  4.96 MB/den
    
    Zbyva:        24.00 GB
                  30 dnu
                  0.8 GB/den
    

    Na výpisu je vidět

    Jestli někdo vidíte chybu nebo byste něco udělali líp/jinak, dejte mi vědět. Pak nevim jestli to bude fungovat i když někdo má nastaveno snížení rychlosti místo placení za data navíc. Testujte.

    Upraveno: (2007-09-01) opraveno podle happy barney + funguje i když je některá hodnota v MB místo GB.

           

    Hodnocení: 100 %

            špatnédobré        

    Tiskni Sdílej: Linkuj Jaggni to Vybrali.sme.sk Google Del.icio.us Facebook

    Komentáře

    Vložit další komentář

    29.8.2007 19:54 sewi | skóre: 21 | blog: Bunker Hill | Prostějov
    Rozbalit Rozbalit vše Re: ADSL FUP v Perlu (Radiokomunikace)

    A jak je to s tim fupem u radiokomunikaci? Me uperatorka tvrdila, ze to neni poznat a ze zadna konkretni hodnota ani neni.

    And they thought they were free
    Přemek Vyhnal avatar 29.8.2007 20:26 Přemek Vyhnal | skóre: 24 | blog: Toto není blog! | Dobřichovice
    Rozbalit Rozbalit vše Re: ADSL FUP v Perlu (Radiokomunikace)
    hodnota je docela konkretni.. u kazdyho tarifu tam mas limit ja mam treba
    Rychlost: 4096/256 kbps 
    FUP limit: 24,00 GB
    
    a sam si muzes vybrat jestli chces snizeni rychlosti nebo platit za GB ktery preneses navic..

    kdyz mas to snizeni tak to mas po tejdnech (tydenni limit / 4) a kdyz dosahnes 80% (asi) tak ti snad zpomalej veci jako torrenty a tak.. a po 100% i web a mail. tu rychlost snizej docela dost.. vsechno to je v tom pdfku

    a kdyz chces platit za data navic tak by to melo bejt ten limit na celej mesic ne tejdny..
    NO RAPTORS!
    29.8.2007 20:32 sewi | skóre: 21 | blog: Bunker Hill | Prostějov
    Rozbalit Rozbalit vše Re: ADSL FUP v Perlu (Radiokomunikace)

    docela pojeb, to kdyby mi rekla na infolajne kdyz me vabila na vyssi rychlost tak ji poslu nekam.

    And they thought they were free
    29.8.2007 21:18 _radek | skóre: 19
    Rozbalit Rozbalit vše Re: ADSL FUP v Perlu (Radiokomunikace)
    Nemluvíte náhodou každý o jiné službě: Classic / Premium
    29.8.2007 21:41 sewi | skóre: 21 | blog: Bunker Hill | Prostějov
    Rozbalit Rozbalit vše Re: ADSL FUP v Perlu (Radiokomunikace)

    Mluvime, pak mi to taky doslo.

    And they thought they were free
    30.8.2007 16:35 happy barney | skóre: 34 | blog: dont_worry_be_happy
    Rozbalit Rozbalit vše Re: ADSL FUP v Perlu (Radiokomunikace)
    poznámka k vlastnostiam perlu:
    ($limit) = m/FUP limit: ([,\d]+) GB/;
    
    Přemek Vyhnal avatar 30.8.2007 17:40 Přemek Vyhnal | skóre: 24 | blog: Toto není blog! | Dobřichovice
    Rozbalit Rozbalit vše Re: ADSL FUP v Perlu (Radiokomunikace)
    Super! diky .-)
    NO RAPTORS!

    Založit nové vláknoNahoru

    ISSN 1214-1267   www.czech-server.cz
    © 1999-2015 Nitemedia s. r. o. Všechna práva vyhrazena.