Ero sivun ”Perl” versioiden välillä
Siirry navigaatioon
Siirry hakuun
p
Malline
Ei muokkausyhteenvetoa |
p (Malline) |
||
(2 välissä olevaa versiota 2 käyttäjän tekeminä ei näytetä) | |||
Rivi 9: | Rivi 9: | ||
}} | }} | ||
'''Perl''' on monella alustalla toimiva ohjelmointikieli, joka on erityisen suosittu dynaamisten www-sivujen teossa. [[Apache | '''Perl''' on monella alustalla toimiva ohjelmointikieli, joka on erityisen suosittu dynaamisten www-sivujen teossa. [[Apache HTTPD]]:n kanssa käytettävä ''mod_perl'' optimoi Perl-palvelujen suorituksen tässä yhteydessä välttämällä koodin turhaa uudelleenkääntämistä. | ||
Larry Wall kehitti Perlin 1987 keskusteluryhmien analysointiin ja tekstidatan käsittely onkin Perlin ominta aluetta. Perl on kuitenkin yleiskäyttöinen ohjelmointikieli, tarkoituksena tarjota työkalu siihen mikä on liian vaikeata [[komentotulkki]]skripteillä ja jota ei kuitenkaan viitsi tehdä [[C]]:llä tai muulla "oikealla" ohjelmointikielellä. Perliin löytyy nykyään erikoistuneita moduleita hyvin moneen tarkoitukseen. | Larry Wall kehitti Perlin 1987 keskusteluryhmien analysointiin ja tekstidatan käsittely onkin Perlin ominta aluetta. Perl on kuitenkin yleiskäyttöinen ohjelmointikieli, tarkoituksena tarjota työkalu siihen mikä on liian vaikeata [[komentotulkki]]skripteillä ja jota ei kuitenkaan viitsi tehdä [[C]]:llä tai muulla "oikealla" ohjelmointikielellä. Perliin löytyy nykyään erikoistuneita moduleita hyvin moneen tarkoitukseen. | ||
Rivi 18: | Rivi 18: | ||
* Komentorivi (suojatulla rivinvaihdolla) jolla määritellään ja ajetaan Perl-ohjelma, joka puolestaan luo järjestelmään "puuttuvat" [[kotihakemisto]]t (tämä on vain perl-esimerkki, älä käytä sitä vakavasti!): | * Komentorivi (suojatulla rivinvaihdolla) jolla määritellään ja ajetaan Perl-ohjelma, joka puolestaan luo järjestelmään "puuttuvat" [[kotihakemisto]]t (tämä on vain perl-esimerkki, älä käytä sitä vakavasti!): | ||
< | |||
<syntaxhighlight lang="perl"> | |||
perl -wce 'setpwent; while (@list=getpwent) {-e $list[7] or mkdir $list[7]'"\ | perl -wce 'setpwent; while (@list=getpwent) {-e $list[7] or mkdir $list[7]'"\ | ||
"'&& chown $list[2], $list[3], "$list[7]" } endpwent;' | "'&& chown $list[2], $list[3], "$list[7]" } endpwent;' | ||
</ | </syntaxhighlight> | ||
* Vaihda tiedoston rivinvaihdot DOS-tyylisistä Unix-tyylisiksi: | * Vaihda tiedoston rivinvaihdot DOS-tyylisistä Unix-tyylisiksi: | ||
< | <syntaxhighlight lang="perl"> | ||
perl -wce 'while (<>) {s/\r\n/\n/}' tiedosto.txt | perl -wce 'while (<>) {s/\r\n/\n/}' tiedosto.txt | ||
</ | </syntaxhighlight> | ||
==Katso myös== | ==Katso myös== | ||
Rivi 37: | Rivi 39: | ||
*[http://www.perl.org/ Perlin kotisivu] | *[http://www.perl.org/ Perlin kotisivu] | ||
{{Ohjelmointikielet}} | |||
[[Luokka:Kehitystyökalut]] | [[Luokka:Kehitystyökalut]] | ||
[[Luokka:Proseduraaliset ohjelmointikielet]] | [[Luokka:Proseduraaliset ohjelmointikielet]] |