Edytujesz „Perl”
Z Nonsensopedii, polskiej encyklopedii humoru
Uwaga: Nie jesteś zalogowany. Jeśli wykonasz jakąkolwiek zmianę, Twój adres IP będzie widoczny publicznie. Jeśli zalogujesz się lub utworzysz konto, Twoje zmiany zostaną przypisane do konta, wraz z innymi korzyściami.
Ta edycja może zostać anulowana. Porównaj ukazane poniżej różnice między wersjami, a następnie zapisz zmiany.
Aktualna wersja | Twój tekst | ||
Linia 6: | Linia 6: | ||
== Przykładowy program == |
== Przykładowy program == |
||
< |
<source lang="perl"> |
||
use strict;use warnings; |
use strict;use warnings; |
||
$SIG{__WARN__}=sub{($_)=@_;/^\w+\s\w+(\w)(?{print$1})(?<=[\s])/}; |
$SIG{__WARN__}=sub{($_)=@_;/^\w+\s\w+(\w)(?{print$1})(?<=[\s])/}; |
||
open OdlroWolleH,$0;print OdlroWolleH „Just Another Perl Hack”; |
open OdlroWolleH,$0;print OdlroWolleH „Just Another Perl Hack”; |
||
</source> |
|||
</syntaxhighlight> |
|||
Czytelny, czyż nie? |
Czytelny, czyż nie? |
||