🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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

Re: Pytanie nowicjusza

#39708
From: hubert depesz lubaczewski
Date: Thu, 14 Oct 2004 18:16
43 lines
2022 bytes
Moon wyrzeźbił(a):
> $abc = shift;

zmienna $abc przyjmuje wartość pierwszego elementu domyslnej tablicy
(najprawdopodobniej @ARGV czyli argumentów programu).

> sub swap($$)

definicja funkcji swap przyjmującej dwa argumenty skalarne.

> {
>     $_ = shift; <- ??

zmienna $_ (inaczej zwana zmienną domyślną) przyjmuje wartość pierwszego
elementu domyslnej tablicy. w tym przypadku tablicy @_ czyli listy
argumentów funkcji.

>     $e = "." x shift; <- ??

zmienna $e przyjmuje wartość będącą wielokrotności znaku ".". ilość
powtórzeń to drugi argument funkcji.

czyli np. swap("depesz", 3)
spowoduje, że 
$_ = "depesz";
$e = "...";

>     s/($e)($e)/$2$1/g; <- to jest wyrażenie regularne, tyle wiem :)

zamienia miescami pierwsze elementy stringu mające tyle znaków ile
podano w argumentach.
czyli na moim przykładzie teraz:
$_ = "eszdep";

>     return $_; <- funkcja zwraca wartość, to zrozumiałe.
> }

depesz

-- 
  napisanie do mnie na priv daje 99.9% gwarancję braku odpowiedzi
*-----------------------------------------------------------------*
 sklep z rzeczami do domu:                        http://ulek.net/
Technical Details
Message-ID: <slrn.pl.cmtgk9.hh6.depesz@depeszms.hq.eo.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.nask.pl!newsfeed.atman.pl!depeszms.hq.eo.pl!news
References: <selxbcly44mx.3qe4mihyriz3$.dlg@40tude.net>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.nask.pl!newsfeed.atman.pl!depeszms.hq.eo.pl!news
From: hubert depesz lubaczewski <depesz@depesz.com>
Newsgroups: pl.comp.lang.perl
Subject: Re: Pytanie nowicjusza
Date: Thu, 14 Oct 2004 20:16:41 +0200
Organization: depesz Software
Lines: 43
Message-ID: <slrn.pl.cmtgk9.hh6.depesz@depeszms.hq.eo.pl>
References: <selxbcly44mx.3qe4mihyriz3$.dlg@40tude.net>
NNTP-Posting-Host: anaconda.eo.pl
Mime-Version: 1.0
X-Trace: node1.news.atman.pl 1097778006 32387 217.17.33.94 (14 Oct 2004 18:20:06 GMT)
X-Complaints-To: abuse@atman.pl
NNTP-Posting-Date: Thu, 14 Oct 2004 18:20:06 +0000 (UTC)
X-Licznik: 8965
User-Agent: slrn/0.9.7.4 (pl-1.4.3) (Linux/2.6.8-1-686 (i686))
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit