🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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

Magiczny parametr.

#52557
From: KEyS
Date: Sat, 14 Sep 2013 14:00
34 lines
1295 bytes
Witam,
   mam problem "jak napisać procedurę obsługującą parametr magiczny?"

ma działać jak np. chomp:
    chomp    -> modyfikuje $_
    chomp($_) działa tak samo.

gdy zrobię:
    sub X($){
      my $S=shift;
      print $S
    }

i $_="Ala ma kota";

wywołanie:

X;

powinno wypisać "Ala ma kota".
     sub X(\$){
       my $S=shift;
       $$S='x';
     }
dla $_ j.w.

X;

print "$_" -> 'x'

pozdrawiam
   Eustachy Kruczała

PS. Może ktoś wie, jak nazwać ten problem ,żeby w GOOGLE znaleźć?
Technical Details
Message-ID: <l11q61$8c3$1@node1.news.atman.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!.POSTED!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!.POSTED!not-for-mail
From: KEyS <key_studio@wp.pl>
Newsgroups: pl.comp.lang.perl
Subject: Magiczny parametr.
Date: Sat, 14 Sep 2013 16:00:30 +0200
Organization: ATMAN - ATM S.A.
Lines: 34
Message-ID: <l11q61$8c3$1@node1.news.atman.pl>
NNTP-Posting-Host: g146.in.net.pl
Mime-Version: 1.0
X-Trace: node1.news.atman.pl 1379167233 8579 89.234.218.146 (14 Sep 2013 14:00:33 GMT)
X-Complaints-To: usenet@atman.pl
NNTP-Posting-Date: Sat, 14 Sep 2013 14:00:33 +0000 (UTC)
User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:23.0) Gecko/20100101 Firefox/23.0 SeaMonkey/2.20
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit