[29391] in Perl-Users-Digest
Perl-Users Digest, Issue: 635 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jul 9 06:10:08 2007
Date: Mon, 9 Jul 2007 03:09:06 -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 Mon, 9 Jul 2007 Volume: 11 Number: 635
Today's topics:
Re: "Pop" an alert of some sort in Windows <bik.mido@tiscalinet.it>
Re: "Pop" an alert of some sort in Windows <lambik@kieffer.nl>
Re: [OT] stopping spam with JavaScript <rvtol+news@isolution.nl>
Re: How to check a form's field and exit Perl program i <m@rtij.nl.invlalid>
How to read input data from pipe, file and files <martinahansen@gmail.com>
new CPAN modules on Mon Jul 9 2007 (Randal Schwartz)
Re: re-lurking <invalid@invalid.nyet>
Re: re-lurking <invalid@invalid.nyet>
Remove a specific element from an Array <sumit.techie@gmail.com>
Re: Remove a specific element from an Array anno4000@radom.zrz.tu-berlin.de
Re: Remove a specific element from an Array <peter@makholm.net>
Re: Remove a specific element from an Array <sumit.techie@gmail.com>
Re: Remove a specific element from an Array anno4000@radom.zrz.tu-berlin.de
Re: Remove a specific element from an Array anno4000@radom.zrz.tu-berlin.de
Re: The Modernization of Emacs: terminology buffer and <mkb@incubus.de>
Re: The Modernization of Emacs: terminology buffer and <dak@gnu.org>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sun, 08 Jul 2007 22:17:53 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: "Pop" an alert of some sort in Windows
Message-Id: <nvg2931hpfp8cckmu593cpt1cfo63rd787@4ax.com>
On Sun, 8 Jul 2007 18:42:07 +0200, "Lambik" <lambik@kieffer.nl> wrote:
>use Win32::GUI ();
Why an explicitly empty import list?
>my $main = Win32::GUI::Window->new(-name => 'Main',
> -caption => "I have something to say",
Remember the Misfits? ("Well I got something to saaaay!")
I installed Win32::GUI but the documentation seems to be lacking both
from command line perldoc (which I generally use) and from the HTML
version: in fact it doesn't seem to follow the standard POD structure,
but the latter has a table of contents with links... which are...
ehm... broken!
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Sun, 8 Jul 2007 23:24:23 +0200
From: "Lambik" <lambik@kieffer.nl>
Subject: Re: "Pop" an alert of some sort in Windows
Message-Id: <469155c0$0$37747$5fc3050@dreader2.news.tiscali.nl>
"Michele Dondi" <bik.mido@tiscalinet.it> wrote in message
news:nvg2931hpfp8cckmu593cpt1cfo63rd787@4ax.com...
> On Sun, 8 Jul 2007 18:42:07 +0200, "Lambik" <lambik@kieffer.nl> wrote:
>
> >use Win32::GUI ();
>
> Why an explicitly empty import list?
>
> >my $main = Win32::GUI::Window->new(-name => 'Main',
> > -caption => "I have something to say",
>
> Remember the Misfits? ("Well I got something to saaaay!")
>
> I installed Win32::GUI but the documentation seems to be lacking both
> from command line perldoc (which I generally use) and from the HTML
> version: in fact it doesn't seem to follow the standard POD structure,
> but the latter has a table of contents with links... which are...
> ehm... broken!
Yes, the docs are not great. The HTML version has 'some' docs and there is a
lot "to be done" among it, so you have to get the fast majority of the info
from the net (http://perl-win32-gui.sourceforge.net/). There is a great
support from the authors though. And the mailing list is active and useful.
I love it. It is very versatile. There are windows stuff you can do which
you can't do with TK and as far as I know not even with wxPerl. Like those
windows you have in MSN Messenger. You know those "someone has signed in"
garbage.
------------------------------
Date: Sun, 8 Jul 2007 16:10:22 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: [OT] stopping spam with JavaScript
Message-Id: <f6r2bn.1ds.1@news.isolution.nl>
Michele Dondi schreef:
> Who's afraid of big bad JS anymore, nowadays?!?
New security breaches that are only possible by using your JavaScript
enabled browser, pop-up every other week. JavaScript is involved in many
recent attacks, and will be for years (AJAX, AIR).
The latest one logs in into predictable sites, like the ones in your
ADSL- or Cable- modem or Cisco-router, for example to set up tunnels. Or
into the ones like Yahoo and Flickr, that keep you "logged in" for
weeks, all of course mainly to facilitate sending spam.
See also:
http://www.securityfocus.com/news/11459
Interesting test: (not using Perl at all, needs JavaScript of course)
http://www.auditmypc.com/anonymous-surfing.asp
Hic sunt leones:
http://meteorserver.org/demo/
http://alex.dojotoolkit.org/wp-content/LowLatencyData.pdf (mentions POE)
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: Sun, 8 Jul 2007 23:42:29 +0200
From: Martijn Lievaart <m@rtij.nl.invlalid>
Subject: Re: How to check a form's field and exit Perl program if it has a value?
Message-Id: <pan.2007.07.08.21.42.47@rtij.nl.invlalid>
On Sat, 07 Jul 2007 18:22:35 -0400, Sherm Pendley wrote:
>> A week learning VB usually is enough.
>
> In fact, a week learning the basics of *any* new language is usually
> enough. All you really need to have "down cold" is the core syntax, and
> a high-level roadmap of the language's standard library. You can look up
> the details when you need them - that's what O'Reilly books are for.
<rant>
Now you've hit one of my sour spots. In C++, a week is NOT enough. Make
that a year for most people.
C++ is an interesting academic exercise that learned us a lot about
programming, but is an utter failure in itself.
Besides, who needs C++ when we've got Perl?
</rant>
M4
------------------------------
Date: Mon, 09 Jul 2007 06:58:21 -0000
From: maasha <martinahansen@gmail.com>
Subject: How to read input data from pipe, file and files
Message-Id: <1183964301.971724.146120@a26g2000pre.googlegroups.com>
G'day all,
In order to stream-line my scripts I would like to be able to read
data from either file(s) or a pipe, however, the way I do this results
in a lot of redundant code as shown in the below code snip. Somehow,
there must be a smarter way to do this!?!
Cheers,
M
if ( not -t STDIN )
{
$fh = &Common::pipe_open();
print &count_entries( $fh ) . "\n";
close $fh;
}
else
{
foreach $file ( @{ $args->{ "FILES" } } )
{
$fh = &Common::read_open( $file );
$count = &count_entries( $fh );
print join( "\t", $file, $count ), "\n";
close $fh;
$tot += $count;
}
}
------------------------------
Date: Mon, 9 Jul 2007 04:42:14 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Mon Jul 9 2007
Message-Id: <JKwAEE.1rJB@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
AnyEvent-2.53
http://search.cpan.org/~mlehmann/AnyEvent-2.53/
provide framework for multiple event loops
----
Apache-Htpasswd-Shadow-0.03
http://search.cpan.org/~adamk/Apache-Htpasswd-Shadow-0.03/
Apache::Htpasswd variant that saves to a different file
----
BDB-0.5
http://search.cpan.org/~mlehmann/BDB-0.5/
Asynchronous Berkeley DB access
----
Bundle-CGI-All-0.01
http://search.cpan.org/~ski/Bundle-CGI-All-0.01/
installs all CGI modules
----
Bundle-CGI-All-0.02
http://search.cpan.org/~ski/Bundle-CGI-All-0.02/
installs all CGI modules
----
Bundle-CGI-All-0.03
http://search.cpan.org/~ski/Bundle-CGI-All-0.03/
installs all CGI modules
----
CPAN-Inject-0.08
http://search.cpan.org/~adamk/CPAN-Inject-0.08/
Base class for injecting distributions into CPAN sources
----
DBIx-MyServer-0.40
http://search.cpan.org/~philips/DBIx-MyServer-0.40/
Server-side implementation of the MySQL network protocol
----
DBIx-MyServer-0.41
http://search.cpan.org/~philips/DBIx-MyServer-0.41/
Server-side implementation of the MySQL network protocol
----
Email-Stuff-2.05
http://search.cpan.org/~adamk/Email-Stuff-2.05/
A more casual approach to creating and sending Email:: emails
----
File-MMagic-XS-0.09002
http://search.cpan.org/~dmaki/File-MMagic-XS-0.09002/
Guess File Type With XS (a la mod_mime_magic)
----
File-Remove-0.37
http://search.cpan.org/~adamk/File-Remove-0.37/
Remove files and directories
----
GD-Barcode-Code93-1.2.1
http://search.cpan.org/~dimartino/GD-Barcode-Code93-1.2.1/
Create Code93 barcode image with GD
----
GD-Barcode-Code93-1.3
http://search.cpan.org/~dimartino/GD-Barcode-Code93-1.3/
Create Code93 barcode image with GD
----
IO-Socket-SIPC-0.07
http://search.cpan.org/~bloonix/IO-Socket-SIPC-0.07/
Serialize perl structures for inter process communication.
----
Lingua-Cyrillic-Translit-ICAO-1.04
http://search.cpan.org/~stro/Lingua-Cyrillic-Translit-ICAO-1.04/
Cyrillic characters transliteration into ICAO Doc 9303
----
Lingua-Multinational-Translit-ICAO-1.04
http://search.cpan.org/~stro/Lingua-Multinational-Translit-ICAO-1.04/
Multinational characters transliteration into ICAO Doc 9303
----
Linux-Apple-Laptop-LED-0.01
http://search.cpan.org/~avar/Linux-Apple-Laptop-LED-0.01/
Turn the front LED on Apple laptops on and off via ADB
----
Linux-Apple-Laptop-LED-0.02
http://search.cpan.org/~avar/Linux-Apple-Laptop-LED-0.02/
Turn the front LED on Apple laptops on and off via ADB
----
Linux-Apple-Laptop-LED-0.03
http://search.cpan.org/~avar/Linux-Apple-Laptop-LED-0.03/
Turn the front LED on Apple laptops on and off via ADB
----
Linux-Apple-Laptop-LED-0.04
http://search.cpan.org/~avar/Linux-Apple-Laptop-LED-0.04/
Turn the front LED on Apple laptops on and off via ADB
----
Module-CGI-Install-0.06
http://search.cpan.org/~adamk/Module-CGI-Install-0.06/
Installer for CGI applications
----
Options-1.5
http://search.cpan.org/~pchriste/Options-1.5/
A perl module to provide better support for command-line option parsing, hopefully better than GetOpts.
----
Pugs-Compiler-Rule-0.24
http://search.cpan.org/~agent/Pugs-Compiler-Rule-0.24/
Compiler for Perl 6 Rules
----
Sub-Multi-0.003
http://search.cpan.org/~clkao/Sub-Multi-0.003/
Data::Bind-based multi-sub dispatch
----
Task-Perl-Critic-1.001
http://search.cpan.org/~elliotjs/Task-Perl-Critic-1.001/
Install everything Perl::Critic.
----
Test-Config-System-0.40
http://search.cpan.org/~iank/Test-Config-System-0.40/
System configuration related unit tests
----
Test-FITesque-0.01_001
http://search.cpan.org/~konobi/Test-FITesque-0.01_001/
the FITesque framework!
----
WWW-Facebook-API-v0.3.8
http://search.cpan.org/~unobe/WWW-Facebook-API-v0.3.8/
Facebook API implementation
----
WWW-Facebook-API-v0.3.9
http://search.cpan.org/~unobe/WWW-Facebook-API-v0.3.9/
Facebook API implementation
----
Wx-0.75
http://search.cpan.org/~mbarbon/Wx-0.75/
interface to the wxWidgets cross-platform GUI toolkit
----
Wx-Data-0.01_01
http://search.cpan.org/~eriam/Wx-Data-0.01_01/
----
X500-DN-0.29
http://search.cpan.org/~rjoop/X500-DN-0.29/
handle X.500 DNs (Distinguished Names), parse and format them
----
pip-0.10
http://search.cpan.org/~adamk/pip-0.10/
Console application for running Perl 5 Installer (P5I) files
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Mon, 9 Jul 2007 02:52:46 -0400
From: "Wade Ward" <invalid@invalid.nyet>
Subject: Re: re-lurking
Message-Id: <8eydnYyjBq2iRgzbnZ2dnUVZ_gCdnZ2d@comcast.com>
"Joe Smith" <joe@inwap.com> wrote in message
news:stmdnS0TutBsqQ3bnZ2dnUVZ_uWlnZ2d@comcast.com...
> Wade Ward wrote:
>> I have tried to get perl scripts to work for me and failed at it enough
>> to consider the endeavor a failure.
>
> Don't give up. It was a minor detail, using {} instead of ().
> Changing the constructor to
> my $nntp = Net::NNTP->new($SERVER, ( Debug => 1) );
> produces the following output:
>
> perl nntp-test.pl
> Net::NNTP>>> Net::NNTP(2.23)
> Net::NNTP>>> Net::Cmd(2.26)
> Net::NNTP>>> Exporter(5.58)
> Net::NNTP>>> IO::Socket::INET(1.27)
> Net::NNTP>>> IO::Socket(1.28)
> Net::NNTP>>> IO::Handle(1.24)
> Net::NNTP=GLOB(0x9ca4ff8)<<< 200 News.GigaNews.Com
> Net::NNTP=GLOB(0x9ca4ff8)>>> MODE READER
> Net::NNTP=GLOB(0x9ca4ff8)<<< 480 authentication required
> new(news.comcast.net) returned Net::NNTP=GLOB(0x9ca4ff8)
> authinfo(myaccount@comcast.net,***) Net::NNTP=GLOB(0x9ca4ff8)>>> AUTHINFO
> USER myaccount@comcast.net
> Net::NNTP=GLOB(0x9ca4ff8)<<< 381 more authentication required
> Net::NNTP=GLOB(0x9ca4ff8)>>> AUTHINFO PASS ....
> Net::NNTP=GLOB(0x9ca4ff8)<<< 281 News.GigaNews.Com
> succeded
> group(comp.lang.perl.misc) Net::NNTP=GLOB(0x9ca4ff8)>>> GROUP
> comp.lang.perl.misc
> Net::NNTP=GLOB(0x9ca4ff8)<<< 211 132152 501456 633607 comp.lang.perl.misc
> succeeded
> Looking for articles since Wed Jul 4 17:46:56 2007
> Net::NNTP=GLOB(0x9ca4ff8)>>> NEWNEWS comp.lang.perl.misc 070705 004656 GMT
> Net::NNTP=GLOB(0x9ca4ff8)<<< 502 NEWNEWS permission denied (command
> disabled)
> Failed to retrieve message ids
> Net::NNTP=GLOB(0x9ca4ff8)>>> QUIT
> Net::NNTP=GLOB(0x9ca4ff8)<<< 205 goodbye
same data?
Net::NNTP>>> Net::NNTP(2.22)
Net::NNTP>>> Net::Cmd(2.24)
Net::NNTP>>> Exporter(5.562)
Net::NNTP>>> IO::Socket::INET(1.25)
Net::NNTP>>> IO::Socket(1.26)
Net::NNTP>>> IO::Handle(1.21)
Net::NNTP=GLOB(0x18326fc)<<< 200 News.GigaNews.Com
Net::NNTP=GLOB(0x18326fc)>>> MODE READER
Net::NNTP=GLOB(0x18326fc)<<< 480 authentication required
Net::NNTP=GLOB(0x18326fc)>>> AUTHINFO USER zaxfuuq@comcast.net
Net::NNTP=GLOB(0x18326fc)<<< 381 more authentication required
Net::NNTP=GLOB(0x18326fc)>>> AUTHINFO PASS ....
Net::NNTP=GLOB(0x18326fc)<<< 281 News.GigaNews.Com
Net::NNTP=GLOB(0x18326fc)>>> GROUP comp.lang.perl.misc
Net::NNTP=GLOB(0x18326fc)<<< 211 132198 501456 633653 comp.lang.perl.misc
Net::NNTP=GLOB(0x18326fc)>>> NEWNEWS comp.lang.perl.misc 070706 064512 GMT
Net::NNTP=GLOB(0x18326fc)<<< 502 NEWNEWS permission denied (command
disabled)
Failed to retrieve message ids
Net::NNTP=GLOB(0x18326fc)>>> QUIT
Net::NNTP=GLOB(0x18326fc)<<< 205 goodbye
# end redirected output
Most of the numbers are similar, if not the same. I didn't suspect, when I
threw in the towel, that the constructor was not syntactically correct. I
did see something about the curly braces being wrong but did not know that
they were causing the constructor to take a dump. Thanks for your help.
--
Wade Ward
------------------------------
Date: Mon, 9 Jul 2007 03:06:02 -0400
From: "Wade Ward" <invalid@invalid.nyet>
Subject: Re: re-lurking
Message-Id: <8uadnZ_VU8DHQwzbnZ2dnUVZ_silnZ2d@comcast.com>
"Michele Dondi" <bik.mido@tiscalinet.it> wrote in message
news:lg4193ls2mc58frpi1e83hohbngdf49qme@4ax.com...
> On Sat, 07 Jul 2007 17:53:49 -0700, Joe Smith <joe@inwap.com> wrote:
>
>> > It's a perl script. I think it's ironic that I can get news with OE
>> > and other apps, but can't with a computer language that was designed
>> > to do this.
>>
>>Not ironic at all. Read the documentation.
I have been reading. A big fat interesting perl reference
> I hadn't noticed that comment, and yes: not ironic at all. In fact
> however big a piece of crap OE could be, it's been developed over
> years by professional programmers to deal amongst others, with Usenet
> news. So for the other apps. OTOH I didn't know that Perl had been
> specifically "designed to do this". Even if it were, and in a strict
> sense, how can one compare an *application* and a language*?!?
Compare them on their ability to do a task, say, processing usenet messages.
I used OE to herd together 84 messages into files about a month ago. It
took on the order of an hour, and it was the type of work with keyboard,
clipboard, mouse and music that got a little repetitive. Here I invoked the
virtue of laziness, and sought a perl script.
--
Wade Ward
------------------------------
Date: Mon, 09 Jul 2007 00:44:37 -0700
From: Sumit <sumit.techie@gmail.com>
Subject: Remove a specific element from an Array
Message-Id: <1183967077.027796.172530@q75g2000hsh.googlegroups.com>
Hey Guys,
I am a new bie to this Group.
I have a Problem.
I want to remove an element from an array whose index i dont know.
--------------------------------------------------------------------------------------------------
#!/usr/bin/perl -w
use strict;
my @updateNames = ();
my @tempArr = ();
my $item = "";
my $item2 = "";
push @updateNames,"I_love_you";
push @updateNames,"I_love_you_too";
push @updateNames,"I_hate_you";
push @tempArr,"I_love_you";
push @tempArr,"I_love_Him";
push @tempArr,"I_hate_you";
foreach $item (@updateNames)
{
foreach $item2 (@tempArr)
{
if ($item eq $item2)
{
pop @updateNames,$item; #This pop is just removing the
last element i want to remove $item2 from @updateNames
}
}
}
print "\n";
foreach $item (@updateNames)
{
print $item;
print "\n";
}
--------------------------------------------------------------------------------------------------
Can somebody help me on this?
--
Sumit
------------------------------
Date: 9 Jul 2007 08:19:20 GMT
From: anno4000@radom.zrz.tu-berlin.de
Subject: Re: Remove a specific element from an Array
Message-Id: <5fe9c8F3c465rU1@mid.dfncis.de>
Sumit <sumit.techie@gmail.com> wrote in comp.lang.perl.misc:
> Hey Guys,
>
> I am a new bie to this Group.
> I have a Problem.
> I want to remove an element from an array whose index i dont know.
> --------------------------------------------------------------------------------------------------
>
> #!/usr/bin/perl -w
> use strict;
>
> my @updateNames = ();
> my @tempArr = ();
> my $item = "";
> my $item2 = "";
>
> push @updateNames,"I_love_you";
> push @updateNames,"I_love_you_too";
> push @updateNames,"I_hate_you";
>
> push @tempArr,"I_love_you";
> push @tempArr,"I_love_Him";
> push @tempArr,"I_hate_you";
>
> foreach $item (@updateNames)
> {
> foreach $item2 (@tempArr)
> {
> if ($item eq $item2)
> {
> pop @updateNames,$item; #This pop is just removing the
> last element i want to remove $item2 from @updateNames
> }
> }
> }
>
> print "\n";
> foreach $item (@updateNames)
> {
> print $item;
> print "\n";
> }
That code doesn't compile. Please *run* your code before you post
it to the group. Non-working code is almost useless as a problem
description.
> Can somebody help me on this?
It looks like you want to remove the elements from @updateNames that
also appear in @tempArr. If so, it would be better to use a hash
instead of @tempArr. You can the use grep() to remove the unwanted
entries:
my @updateNames = qw( I_love_you I_love_you_too I_hate_you);
my %tempHash;
$tempHash{ $_} = 1 for qw( I_love_you I_love_Him I_hate_you);
@updateNames = grep !$tempHash{ $_}, @updateNames;
print "@updateNames\n";
__END__
Anno
------------------------------
Date: Mon, 09 Jul 2007 08:20:45 +0000
From: Peter Makholm <peter@makholm.net>
Subject: Re: Remove a specific element from an Array
Message-Id: <87tzsem1ia.fsf@makholm.net>
Sumit <sumit.techie@gmail.com> writes:
> I am a new bie to this Group.
> I have a Problem.
> I want to remove an element from an array whose index i dont know.
If you want to remove all elements matching some condition, the you
could use the grep function:
@names = grep { $_ != "Some name" } @names;
If you just want to remove one of the element with some value you'll
have to find the index by searching the list and then use splice to
remove the element.
//Makholm
------------------------------
Date: Mon, 09 Jul 2007 01:42:28 -0700
From: Sumit <sumit.techie@gmail.com>
Subject: Re: Remove a specific element from an Array
Message-Id: <1183970548.038509.245520@57g2000hsv.googlegroups.com>
> That code doesn't compile. Please *run* your code before you post
> it to the group. Non-working code is almost useless as a problem
> description.
I can compile the code, the result is wrong i know but i didn't had
any problem in running the code.
Sumit
------------------------------
Date: 9 Jul 2007 09:20:40 GMT
From: anno4000@radom.zrz.tu-berlin.de
Subject: Re: Remove a specific element from an Array
Message-Id: <5fecv7F3cab99U1@mid.dfncis.de>
Sumit <sumit.techie@gmail.com> wrote in comp.lang.perl.misc:
> > That code doesn't compile. Please *run* your code before you post
> > it to the group. Non-working code is almost useless as a problem
> > description.
>
> I can compile the code, the result is wrong i know but i didn't had
> any problem in running the code.
Oh please... . Look at your code again:
#!/usr/bin/perl -w
use strict;
[snip]
foreach $item (@updateNames)
{
The variable $item is undeclared. Under "strict" that is a fatal error.
What do you hope to gain by making verifiably false statements?
Anno
------------------------------
Date: 9 Jul 2007 09:24:59 GMT
From: anno4000@radom.zrz.tu-berlin.de
Subject: Re: Remove a specific element from an Array
Message-Id: <5fed7bF3cab99U3@mid.dfncis.de>
Sumit <sumit.techie@gmail.com> wrote in comp.lang.perl.misc:
> > That code doesn't compile. Please *run* your code before you post
> > it to the group. Non-working code is almost useless as a problem
> > description.
>
> I can compile the code, the result is wrong i know but i didn't had
> any problem in running the code.
Right, apologies. I lost a declaration or two in copy/paste when I
tried to run it.
Anno
------------------------------
Date: Sun, 08 Jul 2007 22:18:06 +0200
From: Matthias Buelow <mkb@incubus.de>
Subject: Re: The Modernization of Emacs: terminology buffer and keybinding
Message-Id: <5fcv44F3c4l7eU1@mid.dfncis.de>
Twisted wrote:
> I, for one, have a strong preference for interfaces that let me see
> what the hell I'm doing and make it easy to find commands, navigate
> the interface, navigate the help, and so forth, while making me resort
> to reaching for that help as infrequently as reasonably achievable.
These are, of course, not unreasonable wishes. I assume you're
programming that software already, given that you're crossposting to
various programming-language newsgroups. Very well. We'll eagerly judge
you by what you'll come up with.
F'up-to: comp.emacs.
------------------------------
Date: Sun, 08 Jul 2007 22:29:52 +0200
From: David Kastrup <dak@gnu.org>
Subject: Re: The Modernization of Emacs: terminology buffer and keybinding
Message-Id: <851wfivdtr.fsf@lola.goethe.zz>
Twisted <twisted0n3@gmail.com> writes:
> On Jul 8, 4:28 am, Adriano Varoli Piazza <mora...@gmail.com> wrote:
>> b) If you do want to keep an antediluvian copy of emacs -probably
>> versioned in the negative numbers, for all you've said- please do. Do
>> be so kind as to send a copy, since it might be quite valuable as an
>> antique.
>
> Judging by the existence of the newsgroup comp.emacs, emacs is
> indeed considered by some to be a quite valuable antique. Otherwise
> why on earth would it have an apparently fairly active newsgroup a
> full seven years into the 21st century?
As opposed to your brain, Emacs has not undergone fossilization 10
years ago. While a newsgroup discussing your dim recollections of
Emacs would indeed be boring (apart from the amusement value of your
pomposity), a newsgroup discussing current (and evolving) versions and
use of Emacs has its place. And anyway, the language C has changed
much less in the last 10 years than Emacs has, and you'll still find
active discussion groups for that, too: it is still very much in use,
like Emacs.
As a note aside, you'd be hard put to find an editor that manages a
similar multitude of encodings as well as Emacs does. While it is to
be expected that in the long term utf-8-encoded Unicode is the way of
the future (and Emacs is going to focus more on that in future
versions, too), at the moment there are few editors which keep up with
the existing multitude of multibyte encodings as well as Emacs does.
Emacs also makes it fairly easy to input stuff without much hassle, so
you can easily write things like ἐν ἀρχῇ ἦν ὁ λόγος or каша гречневая.
So even if you don't like the user interface of Emacs from 10 years
ago and delight in assuming that it did not change in all that time,
there would be valid reasons for using it nevertheless.
--
David Kastrup, Kriemhildstr. 15, 44793 Bochum
------------------------------
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:
#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc. For subscription or unsubscription requests, send
#the single line:
#
# subscribe perl-users
#or:
# unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.
#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 635
**************************************
