abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×

    dnes 13:33 | Komunita Ladislav Hagara | Komentářů: 1
    dnes 13:22 | Komunita

    Richard Hughes na svém blogu oznámil, že počet aktualizací firmwarů pomocí služby LVFS (Linux Vendor Firmware Service) přesáhl 100 milionů. Přehled podporovaných zařízení, nejnovějších firmwarů nebo zapojených výrobců na stránkách LVFS.

    Ladislav Hagara | Komentářů: 0
    dnes 12:55 | Nová verze

    Byla vydána nová stabilní verze 3.19.0, tj. první z nové řady 3.19, minimalistické linuxové distribuce zaměřené na bezpečnost Alpine Linux (Wikipedie) postavené na standardní knihovně jazyka C musl libc a BusyBoxu. Z novinek lze vypíchnou podporu Raspberry Pi 5.

    Ladislav Hagara | Komentářů: 0
    dnes 12:22 | Zajímavý software

    Altap Salamander (Wikipedie), dvoupanelový správce souborů pro Windows, byl uvolněn jako open source pod názvem Open Salamander. Zdrojové kódy jsou k dispozici na GitHubu pod licencí GPLv2.

    Ladislav Hagara | Komentářů: 2
    dnes 07:00 | IT novinky

    Společnost JetBrains představila (YouTube) svou umělou inteligenci JetBrains AI a nástroj AI Assistant v IDE.

    Ladislav Hagara | Komentářů: 6
    včera 22:33 | Nová verze

    Byla vydána nová verze 255 správce systému a služeb systemd (GitHub, NEWS). Z novinek lze vypíchnout například novou službu systemd-bsod.service.

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

    Google představil Gemini, svůj největší a nejschopnější model umělé inteligence.

    Ladislav Hagara | Komentářů: 0
    včera 16:44 | Komunita

    openSUSE komunita vybírá nová loga. Jedním z cílů je odlišit se od SUSE. Aktuálně probíhá hlasování o logu openSUSE a čtyř distribucí Tumbleweed, Leap, Slowroll a Kalpa.

    Ladislav Hagara | Komentářů: 6
    včera 13:22 | Nová verze

    Raspberry Pi OS, oficiální operační systém pro Raspberry Pi, byl vydán v nové verzi 2023-12-05. Přehled novinek v příspěvku na blogu a poznámkách k vydání. Nově jej lze používat také s tmavým tématem.

    Ladislav Hagara | Komentářů: 1
    včera 08:00 | Humor

    Dnes je to 10 let, co byla vytvořena decentralizovaná kryptoměna Dogecoin. Autoři Billy Markus a Jackson Palmer ji původně zamýšleli jako vtip. Znakem kryptoměny je pes Shiba-Inu známý z internetových memů.

    JZD | Komentářů: 11
     (37%)
     (13%)
     (51%)
    Celkem 79 hlasů
     Komentářů: 2, poslední včera 22:12
    Rozcestník

    Dotaz: Prejmenovani pomoci PERLu

    20.2.2006 10:48 Flip
    Prejmenovani pomoci PERLu
    Přečteno: 66×
    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.