Perl 5.16.0

Vyšel perl 5.16.0. Vylepšuje rozšiřitelnost, podporu UTF a dokumentaci. Kompletní seznam změn.

21.5.2012 11:07 | pek | Nová verze

Komentáře

[Bedňa]

Toto nieje dump, ale kód v Perly :)

@P=split//,".URRUU\c8R";@d=split//,"\nrekcah xinU / lreP rehtona tsuJ";sub p{
@p{"r$p","u$p"}=(P,P);pipe"r$p","u$p";++$p;($q*=2)+=$f=!fork;map{$P=$P[$f^ord
($p{$_})&6];$p{$_}=/ ^$P/ix?$P:close$_}keys%p}p;p;p;p;p;map{$p{$_}=~/^[P.]/&&
close$_}%p;wait until$?;map{/^r/&&<$_>}%p;$_=$d[$q];sleep rand(2)if/\S/;print

[xkucf03]

Toto je taky kód v Perlu – a vypadá úplně normálně, skoro jako Java

#!/usr/bin/perl

use strict;
use warnings;
use File::Basename;

if ($ARGV[0] =~ /.*_(.*)\.properties/) {
	my $jazyk = $1;	
	my $skript = basename($0);

	print "\n// -- $skript: automaticky generováno → neupravujte ručně:\n";
	print "hD.překlady['$jazyk'] = new Array();\n";

	while (<STDIN>) {
		s/\\/\\\\/g;
		s/'/\\'/g;
		print /^js\.(.*)=(.*)/ ? "hD.překlady['$jazyk']['$1'] = '$2';\n" : "";
	}

	print "// -- $skript\n\n";

} else {
	die "Nebyl zadán správný název souboru s překladem: $ARGV[0]";
}

[Bedňa]

Ja som kedysi písal v Perly, ale teraz po rokoch, keď si pozerám nejaký PERLovský kód, fakt španielska dedina :)

[mkmm]

To je ukazka obfuskace z wikipedie. Prasit se da v kazdem jazyku, ale navazeni do perlu je zrejme stale popularni.

[xkucf03]

Populární je to taky na webu – stačí se podívat na nějaký ten JavaScriptový zdroják. Údajně se to dělá kvůli zmenšení velikosti přenášených souborů, ale spíš bych řekl, že je to kvůli snížení čitelnosti, aby někdo „neukradl“ jejich úžasné skripty, nebo spíš aby nebylo na první pohled vidět, co tam je za prasárny. Přece jen na webu jde z pohledu výkonu/odezvy spíš o počet HTTP požadavků, než o přenesená data (v době kdy se přenášejí gigabajty a terabajty různých videí, hudby a fotek, je celkem jedno, jestli se přenese pár kilobajtů JavaScriptu nebo o půlku víc).

[Bedňa]

V PERLy sa dajú písať naozaj perly, ja proti nemu nič nemám, ale nedalo mi. Nedávno som lúštil jeden projekt v PERLy a narazil som na dva riadky, kde som skončil, nejak som to potom cez Googla dal, ale bola to perla

[mkmm]

To znam, pred lety jsem psal v perlu hodne a libilo se mi, jak usporne se mohu vyjadrovat. Nedavno jsem nekde nasel stare zdrojaky a take jsem netusil, co jsem tim tehdy chtel vyjadrit. Ale to se mi stava i v cecku, driv jsem se neobtezoval komentovanim kodu, protoze "to je prece jasny", a dnes na to civim cele minuty, nez mi dojde, co ten kod delal.