[32236] in Perl-Users-Digest
Perl-Users Digest, Issue: 3501 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Sep 18 09:09:20 2011
Date: Sun, 18 Sep 2011 06:09:04 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 18 Sep 2011 Volume: 11 Number: 3501
Today's topics:
Re: $_ or @_ in subrountine? <rvtol+usenet@xs4all.nl>
Catalyst Newsgroup? <stevem_@nogood.com>
Re: Catalyst Newsgroup? <tadmc@seesig.invalid>
Re: Question about range of Lines <hjp-usenet2@hjp.at>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 17 Sep 2011 23:38:56 +0200
From: "Dr.Ruud" <rvtol+usenet@xs4all.nl>
Subject: Re: $_ or @_ in subrountine?
Message-Id: <4e751370$0$2421$e4fe514c@news2.news.xs4all.nl>
On 2011-09-17 01:43, Jürgen Exner wrote:
> Rainer Weikusat<rweikusat@mssgmbh.com> wrote:
>> $_ is a 'special global variable' and this means that the assignment
>> quoted above will assign the present value of $_ to $subfile. And this
>> can pretty much be anything, since $_ is used as 'default variable' in
>> various constructs, such as
>>
>> for (@a) { ... }
>>
>> while (<>) { ... }
>>
>> given ($blah) {
>> when (/something) {
>> }
>> }
>
> Sure.
Not quite.
In case of the for ( .. ), the $_ is localized, like in:
perl -Mstrict -wle '
$_ = q{foo};
print;
print for map " $_", qw( bar baz );
print;
'
foo
bar
baz
foo
--
Ruud
------------------------------
Date: Sat, 17 Sep 2011 10:21:53 -0700
From: Steve May <stevem_@nogood.com>
Subject: Catalyst Newsgroup?
Message-Id: <tI4dq.15139$EP3.10707@newsfe05.iad>
Hi folks,
Perhaps I'm just exceptionally thick today, but....
I've been looking around for a news group or list that focuses on
Catalyst and don't seem to be having any luck. If there is a link to
something like on catalystframework.org I am missing it.
So... Is there such a thing?
Pointers/links appreciated.
Thanks,
Steve
------------------------------
Date: Sat, 17 Sep 2011 13:56:32 -0500
From: Tad McClellan <tadmc@seesig.invalid>
Subject: Re: Catalyst Newsgroup?
Message-Id: <slrnj79qj8.41l.tadmc@tadbox.sbcglobal.net>
Steve May <stevem_@nogood.com> wrote:
> I've been looking around for a news group
There is no newsgroup specific to Catalyst.
> or list that focuses on
> Catalyst and don't seem to be having any luck.
> Pointers/links appreciated.
When you are wondering about Perl-related mailing list,
your first stop should be the list of over 200 at:
http://lists.perl.org
This one looks promising:
http://lists.perl.org/list/catalyst.html
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.liamg\100cm.j.dat/"
The above message is a Usenet post.
I don't recall having given anyone permission to use it on a Web site.
------------------------------
Date: Sat, 17 Sep 2011 11:49:14 +0200
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: Question about range of Lines
Message-Id: <slrnj78r8q.ui7.hjp-usenet2@hrunkner.hjp.at>
On 2011-09-15 12:34, Tad McClellan <tadmc@seesig.invalid> wrote:
> mauro papandrea <dba1@csi.it> wrote:
>> Given this simple file:
>>
>> Sunday
>> Monday
>> Tuesday
>> Wednesday
>> Thursday
>> Friday
>> Saturday
>
>
>> Namely, getting this output:
>>
>> Tuesday
>> Wednesday
>> Thursday
>
>
> perl -ne '$a = 1 if /Tuesday/; $a = 0 if /Friday/; print if $a' t1
Another solution which avoids the range operator:
perl -e '$/ = undef; $s = <>; print $s =~ /^(Tuesday.*?)^Friday/sm;' t1
hp
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
Back issues are available via anonymous ftp from
ftp://cil-www.oce.orst.edu/pub/perl/old-digests.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V11 Issue 3501
***************************************
