Véget ért az idei április elseje az ApocalypseKÖZÖSön. Bagoly búcsúzik.

Csupán az érdekesség kedvéért, a négy sor, amely az idei tréfáért felelős volt:

$text =~ s|(<.*?>)|&StoreRaw($1)|ge; $text =~ s|(&\S+;)|&StoreRaw($1)|ge; $text =~ s|[aáeéiíoóöőuúüűAÁEÉIÍOÓÖŐUÚÜŰ]||g; $text = uc($text);

Kis magyarázat:

• Az első sor azért kellett, hogy a html kód érintetlen maradjon.
• A második sor azért felel, hogy az sgml karakterkódokat ne érje ártalom.
• A harmadik sor eltünteti a magánhangzókat.
• A negyedik minden maradékot nagybetűssé tesz.

További jó mulatást!