🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.perl
Article #52020

Re: Potęga Perla?

#52020
From: Szymon Sokół
Date: Wed, 17 Nov 2010 19:38
53 lines
3697 bytes
On Wed, 17 Nov 2010 11:03:28 -0800 (PST), Grzegorz Kuczyński wrote:

> Często słyszy się od doświadczonych administratorów, iż Perl to
> podstawa, Perl, nic tylko Perl. Nie jestem początkującym w
> programowaniu. Wydaje mi się, że te obstawanie za Perlem jest wynikiem
> tego, iż istnieje on najdłużej i tak już się ludzie "wychowali". Z
> tego co wiem, to Perl nie ma możliwości, których nie miałby Python.

Zasadniczo, prawdopodobnie, nie. Oczywiście z racji wieku ma znacznie więcej
dostępnych gotowych modułów...

> Wydaje mi się, że jeżeli ktoś dopiero teraz ma zaczynać naukę takiego
> języka, to Perl wcale nie jest najlepszym wyborem. Rozumiem osoby,
> które nauczyły się 5-10 lat temu Perla i nie mają powodu uczyć się
> Pythona.

Perla istotnie nauczyłem się ładne parę lat temu, ale był moim -nastym
językiem programowania i i tak uznałem nauczenie się go za zasadne. Pythona
próbowałem się uczyć, ale dałem sobie spokój, ponieważ nie oferuje mi
żadnych nowych możliwości. 

> Pytam bo chcę kupić sobie książkę i dlatego, że na jednej z rozmów o
> pracę pytali mnie o Perla. Jak powiedziałem, że używam Pythona to
> głową "szef" kręcił. Podejrzewam, że chodziło mu o to, że oni mają już
> w tym perlu stworzone skrypty itd.... a nie o to, że w Pythonie się
> nie da albo będzie to trwało dwa razy dłużej.

Bardzo możliwe. Z tego co słyszałem, w Google pytają o Pythona i Javę.

> Tak więc co takiego ma Perl czego nie ma Python oprócz swoich
> żołnierzy i religii? :)

Z praktyki administratorskiej: możliwość pisania sensownych onelinerów. W
Pythonie pisanie onelinerów jest wybitnie utrudnione przez składnię, tzn.
strukturę blokową definiowaną wcięciami. Przy dłuższych skryptach to
oczywiście nie ma specjalnego znaczenia, ale mnie się często zdarza pisac
rzeczy typu:

perl -anle 'if($F[2]=~/^<(.*)>$/){$h{$1}++}; END {printf "%d %s\n",$h{$_},$_
for (sort {$h{$b}<=>$h{$a}} keys %h)[0..9]}' irclogs/2010-*.log

albo

perl -e 'use Date::Calc qw{Day_of_Week}; for $y (2001..2100) { push @y,$y if
Day_of_Week($y,10,1) == 5 } print "@y\n"'

(zagadka: jaki rozpowszechniany niedawno w sieci mem da się obalić tym
ostatnim kawałkiem kodu?)
-- 
Szymon Sokół (SS316-RIPE) -- Network Manager                                 B
Computer Center, AGH - University of Science and Technology, Cracow, Poland  O
http://home.agh.edu.pl/szymon/ PGP key id: RSA: 0x2ABE016B, DSS: 0xF9289982  F
Free speech includes the right not to listen, if not interested -- Heinlein  H
Technical Details
Message-ID: <qhm7t8o27fos$.dlg@falcon.sloth.hell.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!dustpuppy.sloth.hell.pl!not-for-mail
References: <c81b0b84-b5e2-4ab4-b350-73f1f5442fad@j1g2000vbl.googlegroups.com>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!dustpuppy.sloth.hell.pl!not-for-mail
From: Szymon Sokół
 <szymon@bastard.operator.from.hell.pl>
Newsgroups: pl.comp.lang.perl
Subject: Re: Potęga Perla?
Date: Wed, 17 Nov 2010 20:38:38 +0100
Organization: Guy Fawkes Society
Lines: 53
Sender: szymon@news.agh.edu.pl
Message-ID: <qhm7t8o27fos$.dlg@falcon.sloth.hell.pl>
References: <c81b0b84-b5e2-4ab4-b350-73f1f5442fad@j1g2000vbl.googlegroups.com>
NNTP-Posting-Host: chello089078159131.chello.pl
Mime-Version: 1.0
X-Trace: news.agh.edu.pl 1290022767 4531 89.78.159.131 (17 Nov 2010 19:39:27 GMT)
X-Complaints-To: abuse@agh.edu.pl
NNTP-Posting-Date: Wed, 17 Nov 2010 19:39:27 +0000 (UTC)
User-Agent: 40tude_Dialog/2.0.15.1 Hamster/2.1.0.11
X-Face: xic?6f"rD)k-tM.]L]A6l4W7_aGt({}&{D,hiRI.8cPtf,1F.w@Qkl!vr23o1UY-BfXO$p< hk5>ijB?eBy)?!C<@)+%U\&`1X)MJ>.i.qgkY]4mvL62j<|xJRG/5:7:l8q]x;v!)Bz^r/!yG8DxoD -@fnC,g]BAXj
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit