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 02:00 | Pozvánky

Konference OpenAlt 2018 (dříve LinuxAlt a Openmobility) proběhne již o víkendu 3. a 4. listopadu na FIT VUT v Brně. Motto konference je "Otevřeným přístupem k otevřené společnosti". Připraveno je 8 tracků přednášek a workshopů. Pořadatelé připravili výběr toho nejzajímavějšího.

Ladislav Hagara | Komentářů: 0
včera 01:00 | IT novinky

Bylo vydáno RFC 8484 řešící posílání DNS dotazů a získávání DNS odpovědí přes protokol HTTPS (DoH, DNS over HTTPS). V aktuálních verzích Firefoxu je DoH ve výchozím nastavení zakázáno. Povolit jej lze v about:config změnou hodnoty network.trr.mode (Trusted Recursive Resolver). V srpnu zveřejnila Mozilla výsledky experimentu s DNS přes HTTPS ve Firefoxu Nightly.

Ladislav Hagara | Komentářů: 26
19.10. 13:00 | Komunita

Při prvním spuštění Ubuntu 18.04 LTS (Bionic Beaver) je spuštěn nástroj Ubuntu Report. Pokud uživatel souhlasí, jsou pomocí tohoto nástroje odeslány do Canonicalu informace o daném počítači (doba instalace, počet procesorů, rozlišení displeje, velikost paměti, časová zóna, ...). V červnu byly zveřejněny první statistiky. Podrobnější statistiky jsou nově k dispozici na samostatné stránce.

Ladislav Hagara | Komentářů: 12
19.10. 01:00 | Pozvánky

O víkendu probíhá v Košicích pravidelné setkání příznivců otevřených technologií OSS Víkend. Na programu je řada zajímavých přednášek a workshopů.

Ladislav Hagara | Komentářů: 0
19.10. 00:11 | Nová verze

Byla vydána nová verze 1.3 otevřeného, licenčními poplatky nezatíženého, univerzálního ztrátového formátu komprese zvuku Opus (Wikipedie) a jeho referenční implementace libopus. Vylepšena byla například detekce, zda se jedná o řeč nebo o hudbu. Přidána byla podpora prostorového zvuku (immersive audio) dle plánovaného RFC 8486. Podrobnosti a zvukové ukázky na demo stránce.

Ladislav Hagara | Komentářů: 0
18.10. 22:33 | Nová verze

Bylo vydáno Ubuntu 18.10 s kódovým názvem Cosmic Cuttlefish (Kosmická sépie). Ke stažení jsou Ubuntu Desktop a Server, Ubuntu Cloud Images, Ubuntu Netboot, Kubuntu, Lubuntu a Lubuntu Alternate, Ubuntu Budgie, Ubuntu Kylin, Ubuntu MATE, Ubuntu Studio a Xubuntu. Podrobnosti v poznámkách k vydání.

Ladislav Hagara | Komentářů: 3
18.10. 18:33 | Nová verze

Byl vydán PostgreSQL ve verzi 11.0. Přehled novinek v poznámkách k vydání.

Ladislav Hagara | Komentářů: 0
18.10. 17:33 | IT novinky

Nadace Raspberry Pi představila na svém blogu Raspberry Pi TV HAT, tj. rozšíření jednodeskového počítače Raspberry Pi umožňující příjem televizního vysílání DVB-T a DVB-T2. Cena rozšíření je 21,50 $.

Ladislav Hagara | Komentářů: 9
18.10. 17:07 | Nová verze

Vychází OpenBSD 6.4. Z řady novinek namátkou: podpora dalších architektur (arm64 např. dostal z Linuxu vypůjčený ovladač radeondrm), hypervizor vmm podporuje i qcow2 disky a šablony, jádro dokáže automaticky přepínat mezi dostupnými bezdrátovými sítěmi, sítě pracují o něco efektivněji, z bezpečnosti „přísaha byla doplněna odhalením“ (pledge(2) lze vhodně doplnit pomocí unveil(2)), SMT je ve výchozím stavu vypnutý, ale lze jej zapnout. Syntaxe nastaveni OpenSMTPD se změnila. S vydáním vychází také nová verze LibreSSL - 2.8.2.

Daniel Čižinský | Komentářů: 5
17.10. 23:15 | IT novinky

Firma Raptor Computing Systems, která stojí také za pracovní stanicí Talos II, představila levnější desku Blackbird s podporou jednoho 4-/8jádrového CPU POWER9 Sforza a formátem microATX; bližší specifikace jsou ve wiki výrobce.

Fluttershy, yay! | Komentářů: 30
Přispíváte osobně k vývoji svobodného softwaru?
 (39%)
 (43%)
 (25%)
 (22%)
 (11%)
 (37%)
Celkem 273 hlasů
 Komentářů: 15, poslední dnes 00:50
Rozcestník

Dotaz: Prejmenovani pomoci PERLu

20.2.2006 10:48 Flip
Prejmenovani pomoci PERLu
Přečteno: 52×
Ahoj, nejak mi to nejde, co delam spatne?
#!/usr/bin/perl
print "\n";
($sek,$min,$hod,$den,$mes,$rok) = localtime(time);
$rok += 1900;
$mes += 1;
$date ="$rok";
print "$date";
print "\n";

  if ($mes < 10){ $date = "$date-0$mes";
  }else{ $date = "$date-$mes"; }
print "$date";
print "\n";

  if ($den < 10){ $date = "$date-0$den";
  }else{ $date = "$date-$den"; }
print "$date";
print "\n";

  if ($hod < 10){ $date = "$date-0$hod";
  }else{ $date = "$date-$hod"; }
print "$date";
print "\n";

  if ($min < 10){ $date = "$date-0$min";
  }else{ $date = "$date-$min"; }

print "$date";
print "\n";
$sjmeno = "/home/xxx/osms.txt";
$njmeno = "/home/xxx/osms$date.txt";
print "$sjmeno $njmeno";
print "\n";
rename($sjmeno,$njmeno);
print "\n";

Odpovědi

20.2.2006 11:17 Ja.
Rozbalit Rozbalit vše Re: Prejmenovani pomoci PERLu
Jestli ti to nejde spustit, tak to asi bude tim, ze mas napsanu cestu interpretu a print na jednom radku(predpokladam, ale ze jsi jenom blbe zformatoval tento text).

Musis mit:
#!/usr/bin/perl
print "\n\n\n\n\n\n";

Jinak to funguje.

Pokud to neprejmenovava ten soubor, koukni na jeho vlastnika a prava.
PS: a nauc se klast otazky...za tuhle bych te...;)
20.2.2006 11:25 Ja.
Rozbalit Rozbalit vše Re: Prejmenovani pomoci PERLu
uz to nekdo predelal...diky:)
20.2.2006 11:38 Flip
Rozbalit Rozbalit vše Re: Prejmenovani pomoci PERLu
Omlouvam se za formatovani.

Scrip funfuje ale neprejmenovava. Prava jsou OK.
20.2.2006 11:28 Michal Vyskočil | skóre: 60 | blog: miblog | Praha
Rozbalit Rozbalit vše Re: Prejmenovani pomoci PERLu
Ahoj, na zdrojáky příště použij tag pre. No a popis chyby stylem "nějak mi to nejde" ... to si koleduje o odpověď ve stylu křišťálové koule. Zkus trochu blíže popsat svůj problém.

OT: Perl neznám, ale nejde tam napsat něco jako print "$date\n";?
When your hammer is C++, everything begins to look like a thumb.
20.2.2006 12:05 barmey
Rozbalit Rozbalit vše Re: Prejmenovani pomoci PERLu
hmm ... len tak bez testovania, skus spustit nasledovny skript

#!/usr/bin/perl

use POSIX qw( strftime );

my $date = strftime ('%Y-%m-%d-%H-%M', localtime);

sjmeno = "/home/xxx/osms.txt";
$njmeno = "/home/xxx/osms$date.txt";

rename($sjmeno,$njmeno) or die "Nepodarilo sa: $!\n";
20.2.2006 12:58 Flip
Rozbalit Rozbalit vše Re: Prejmenovani pomoci PERLu HOTOVO
Děkuji, takhle to je OK.

Patrně neco špatně nastaveno v localtime, ale to sem uz nepatri.
#!/usr/bin/perl

use POSIX qw( strftime );

my $date = strftime ('%Y%m%d%H%M%s', localtime);

$sjmeno = "/home/xxx/osms.txt";
$njmeno = "/home/xxx/osms$date.txt";

rename($sjmeno,$njmeno) or die "Nepodarilo sa: $!\n";

Založit nové vláknoNahoru

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

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