Perl: Różnice pomiędzy wersjami
Z Nonsensopedii, polskiej encyklopedii humoru
(→Przykładowy program: inny przykład) Znacznik: edytor źródłowy |
Ostrzyciel (dyskusja • edycje) M (jest mały problem z tym kodem... on służy do łamania zabezpieczeń dvd, może to nie najlepsze miejsce na to) Znacznik: edytor źródłowy |
||
| Linia 14: | Linia 14: | ||
</source> |
</source> |
||
Czytelny, czyż nie? |
Czytelny, czyż nie? |
||
inny przykład: |
|||
<source lang="perl"> |
|||
$_='while(read+STDIN,$_,2048){$a=29;$b=73;$c=142;$t=255;@t=map{$_%16or$t^=$c^=( |
|||
$m=(11,10,116,100,11,122,20,100)[$_/16%8])&110;$t^=(72,@z=(64,72,$a^=12*($_%16 |
|||
-2?0:$m&17)),$b^=$_%64?12:0,@z)[$_%8]}(16..271);if((@a=unx"C*",$_)[20]&48){$h |
|||
=5;$_=unxb24,join"",@b=map{xB8,unxb8,chr($_^$a[--$h+84])}@ARGV;s/...$/1$&/;$ |
|||
d=unxV,xb25,$_;$e=256|(ord$b[4])<<9|ord$b[3];$d=$d>>8^($f=$t&($d>>12^$d>>4^ |
|||
$d^$d/8))<<17,$e=$e>>8^($t&($g=($q=$e>>14&7^$e)^$q*8^$q<<6))<<9,$_=$t[$_]^ |
|||
(($h>>=8)+=$f+(~$g&$t))for@a[128..$#a]}print+x"C*",@a}';s/x/pack+/g;eval |
|||
</source> |
|||
{{stub|inf}} |
{{stub|inf}} |
||
Wersja z 11:27, 22 lip 2017
P
 |
Uwaga! Jest po północy! Programisto! Czy wiesz gdzie wskazuje teraz Twój wskaźnik? |
| Ten artykuł jest częścią cyklu naukowego języki komputerowe. |
|
Języki programowania: |
|
Inne języki komputerowe: |
|
|
| edytuj ten szablon |
W Perlu to zrobisz jedną linijką.
- Typowy informatyk o Perlu
Perl – język programowania, który powstał na zawody najmniej czytelnego języka na świecie. Kod w nim napisany przestaje być czytelny po około pięciu minutach od jego napisania, a jego składnia wygląda tak, jakby przed chwilą po klawiaturze przeszedł kot. Co zaskakujące – ten kod działa. Japończycy pod wpływem napojów wyskokowych napisali jego następcę – Ruby. Stan uspokojenia osiąga się zmieniając Perla na Pythona AWKa.
Przykładowy program
use strict;use warnings;
$SIG{__WARN__}=sub{($_)=@_;/^\w+\s\w+(\w)(?{print$1})(?<=[\s])/};
open OdlroWolleH,$0;print OdlroWolleH „Just Another Perl Hack”;
Czytelny, czyż nie?
To jest tylko zalążek artykułu z dziedziny informatyki. Jeśli klikasz szybciej niż myślisz – rozbuduj go.
