Perl

Mikä tässä alla olevassa aiheuttaa virheen: #!/usr/bin/env bash on () { echo "Tiedosto on olemassa." } ei () { echo "Tiedostoa ei ole olemassa." } [ -f testi.txt ] && on || ei

Alussa on 100 palavaa lamppua. Siirryt ovelta ovelle, sammuttaen palavan ja sytyttäen sammutetun lampun. Aloitus kierroksella sammutat jokaisen lampun, toisella kierroksella käyt vain joka toisella lampulla, sytyttäen t…

antigravity.py tyylisistä moduulleista. Kiinnitin huomitota riviin 5 kyseisessä moduullissa: webbrowser.open("https://xkcd.com/353/") Eihän tälläisia asiaan kuulumattomia juttuja tarvita, vai tarvitaanko, ja kuka näitä …

Miten tulisi menetellä että seuraavat funktiot toimisi. Haluaisin tehdä oman moduulin pythoniin, jossa olisi nämä alla olevat ja paljon muita näppäriä funktioita. print(morse_aakkoset) print(aakkoset_lowercase) print(aa…

Melkoinen ero näissä on havaittavissa joten kannattaa tiukoissa ja aikaa vievissä silmukoissa, katsoa mitä käyttää. Testaa nämä silmukat Bash Shell komentokehotteessa: Python2.x python2 -m timeit -s 'L = range(1000)' 'z…

print ( "[", str.center( 'aa', 10, '*' ), "]" ) Tulostaa [ ****aa**** ] Koinka tuo saadaan niin, ettei reunoille jää välilyöntiä, siis näin [*****aa*****].

TARVITAAN PYTHON KOODIA jolla voi ratkaista alla olevan tehtävän. Sinulla on normaali 52 kortin korttipakka, josta valitset 5 korttia. Kuinka monta erinlaista valintaa sinä voit tehdä?

ja jos on missä se on: https://s2.gifyu.com/images/Valinta_064.png

Löytyykö koodinpurkuohjelmaa perl-koodatulle tekstille?

Hei, miksei täällä ole ketään? Olenko viimeinen dinosaurus?

Fresnelin integraalit (kts. wiki) voi toki laskea perlin liitännäisen avullakin mutta jos liitännäistä ei ole, niin saahan perl-ohjelmaan octave:n käskyjä system käskyn avulla. Octave on matematiikkaohjelma vrt. Matlab.…

Regular Expression scripti: if ($line =~ m/\d/i) löytää riviltä numeerisen arvon. Miten saan sen eteen jonkun merkin? Esimerkiksi pilkun. foo foo .... . . 44323 Pitäisi saada: foo foo,44323

#/usr/local/bin/perl #Miten paljon viestiketjulla (suomi24) on keskimäärin lukijoita ja vastaajia? $file="tilasto.dat"; #lähdeaineiston sisältävän tiedoston nimi open (FH1, $file); #Avataan lähdeaineiston sisältävä tied…

Hei, harjoittelen r-kieltä, jota tarvitsen data-analyysiin ja huomasin, että datan manipulointi saattaisi käydä kätevämmin Perl-ohjelmalla. Ja siitä saattaisi olla muutakin hyötyä esim. datan hakemiseen netistä, mikäli …

Miten saan muutettua tiedoston nimet Windowssin Perlillä? Isot pieniksi ja välilyönnit pois aluksi. Yksi malli: perl -e 'for (@ARGV) { ($new=$_) =~ s/(. )(.)\.html$/$1$2.shtml/; rename $_, $new unless -e $new }' *.html

Hei, Voisiko joku selittää, miten tämä wikipedian esiemerkki flood fill-algoritmista toimii? http://en.wikipedia.org/wiki/File:Recursive_Flood_Fill_4_(aka).gif Scrpti on tällainen: sub FloodFill4 { my ($x, $y) = @_; if …

Kolmisarakkeinen pitkä taulukko on kopioitu veppisivulta, mutta erottimeksi tullut rivinvaihto CR eli (\r) joka solun väliin! Sen palauttamiseksi alkuperäiseen muotoon kolmen ryhmän kaksi ensimmäistä CRää (\r) pitäisi v…

Tein pienen itsenäisen skriptin (siis eräänlaisen mini web-serverin) johon netistä otetaan yhteyttä web-selaimella. Mutta en tiedä miten voisi välittää sille selaimen lomakkeelta GET "query parametrit".

Miksi mää en voi ottaa dataa recv():illa samaan aikaan, kun toisella säikeellä lähetän sitä send():illä. send() ei suostu lähettämään, jos recv() odottelee uutta dataa. C:llä tuo menetelmä toimii hyvin. Missä vika, autt…

while () { if(m/aaa.*zzz/) {print $1} } ei tulosta mitään miten saada tulostuman osunut merkkijono. esim 111sfdfs999