comp.lang.perl.misc
  Home FAQ Contact Sign in
comp.lang.perl.misc only
 
Advanced search
April 2008
motuwethfrsasuw
 123456 14
78910111213 15
14151617181920 16
21222324252627 17
282930     18
2008
 Jan   Feb   Mar   Apr 
 May   Jun   Jul   Aug 
 Sep   Oct   Nov   Dec 
2008 2007 2006  
total
comp.lang.perl.misc Profile…
RELATED GROUPS

POPULAR GROUPS

more...

 Up
  FAQ 1.6 What is Perl 6?         


Author: PerlFAQ Server
Date: Apr 19, 2008 18:03

This is an excerpt from the latest version perlfaq1.pod, which
comes with the standard Perl distribution. These postings aim to
reduce the number of repeated questions as well as allow the community
to review and update the answers. The latest version of the complete
perlfaq is at http://faq.perl.org .

--------------------------------------------------------------------

1.6: What is Perl 6?

At The Second O'Reilly Open Source Software Convention, Larry Wall
announced Perl 6 development would begin in earnest. Perl 6 was an oft
used term for Chip Salzenberg's project to rewrite Perl in C++ named
Topaz. However, Topaz provided valuable insights to the next version of
Perl and its implementation, but was ultimately abandoned.

If you want to learn more about Perl 6, or have a desire to help in the
crusade to make Perl a better place then peruse the Perl 6 developers
page at http://dev.perl.org/perl6/ and get involved.

Perl 6 is not scheduled for release yet, and Perl 5 will still be
supported for quite awhile after its release. Do not wait for Perl 6 to
do whatever you need to do.
Show full article (1.83Kb)
no comments
  how to parse from the end?         


Author: Ela
Date: Apr 19, 2008 17:40

The following rule sets are generated by a program, which is not readily
human-readible. In order to formulate the rules into a table-like format
(supposed I know all attributes in advance), e.g.

code of (CA)n allele1 code of (CA)n allele2 LTC4Si_24
CTLA41i_22 APOB1c_29 IL61i_16 PAI12c_54 ... outcome support
Rule1 <=2 <=1
1 or 3 1 1 or 3
0 29; 0.621
Rule2 <=2 <=1
1 or 3 1 2
1 5; 1.0
....
Rulen <=2 >1
1/3 1/3 0 52; 0.692
...
Show full article (1.98Kb)
no comments
  $nntp ->list()         


Author: Gerry Ford
Date: Apr 19, 2008 14:11

[repost from elsewhere]
I've been looking at Mats Peterson's client for the last week. He has a
perl script and a resource file for things like your server name.

It occurs to me that a person would want to have another resource file of
some type that will hold the list of newsgroups. With my newsfeed, there's
100,000 of them, and I use a 56K dial-up, so it takes five or ten minutes.
When I fire up OE or binary vortex for the first time, it says "hold on, I'm
downloading the list of newsgroups. This could take a while, but you
prettymuch only have to do it once." Consequently it has to be serialized
somehow.

When I've had my minimal clients before, I would hard-code the group I was
looking at, like so:
#!/usr/bin/perl -w

use strict;
use Net::NNTP ();

use constant NUMBER_OF_ARTICLES => 100;
use constant GROUP_NAME => 'comp.lang.c';
use constant SERVER_NAME => 'news.newsgroups.com';
use constant NNTP_DEBUG => 0;
Show full article (3.32Kb)
3 Comments
  Perltidy option to generate/keep BSD Style of bracketing ?         


Author: Asim Suter
Date: Apr 19, 2008 13:00

By default it generates code like K&R style:

if( ......................... ){

}

which I do not like:

========================

I'd like it generate BSD style like following:

if( ........................ )
{

}

Is there an option in perltidy to achieve that ?
I don't seem to find one in perltify help.

TIA
Asim
1 Comment
  How to record .asx files         


Author: stpra123
Date: Apr 19, 2008 12:27

I was hoping to find some help on this issue. I am trying to take
an .asx file and convert it to .mp3. The problem is is that I need to
use the information encoded in the .asx file to determine when to
start recording and when to end recording (otherwise, I would just
take an off the shelf program to convert the files). For example, many
of the audio files don't start having sound until about 15 minutes
into the file so obviously I don't want to record the file until the
audio actually starts. An example is from: http://biz.yahoo.com/cc/. I
would need to do a batch conversion of multiple files. How would I do
this in PERL?
no comments
  mod_perl and parallel Perl versions         


Author: Gunnar Hjalmarsson
Date: Apr 19, 2008 12:10

I have installed Perl 5.10.0 on my Linux box to be available together
with the vendor supplied Perl 5.8.1. When running programs under
mod_perl, the old Perl version is utilized.

How can I make mod_perl use Perl 5.10.0? Can mod_perl be configured so I
can select Perl version on-the-fly?

--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
7 Comments
  FAQ 1.5 What was Ponie?         


Author: PerlFAQ Server
Date: Apr 19, 2008 12:03

This is an excerpt from the latest version perlfaq1.pod, which
comes with the standard Perl distribution. These postings aim to
reduce the number of repeated questions as well as allow the community
to review and update the answers. The latest version of the complete
perlfaq is at http://faq.perl.org .

--------------------------------------------------------------------

1.5: What was Ponie?

(contributed by brian d foy)

Ponie stands for "Perl On the New Internal Engine", started by Arthur
Bergman from Fotango in 2003, and subsequently run as a project of The
Perl Foundation. It was abandoned in 2006 (
http://www.nntp.perl.org/group/perl.ponie.dev/487 ).

Instead of using the current Perl internals, Ponie aimed to create a new
one that would provide a translation path from Perl 5 to Perl 6 (or
anything else that targets Parrot, actually). You would have been able
to just keep using Perl 5 with Parrot, the virtual machine which will
compile and run Perl 6 bytecode.

--------------------------------------------------------------------
Show full article (1.62Kb)
no comments
  FAQ 1.1 What is Perl?         


Author: PerlFAQ Server
Date: Apr 19, 2008 06:03

This is an excerpt from the latest version perlfaq1.pod, which
comes with the standard Perl distribution. These postings aim to
reduce the number of repeated questions as well as allow the community
to review and update the answers. The latest version of the complete
perlfaq is at http://faq.perl.org .

--------------------------------------------------------------------

1.1: What is Perl?

Perl is a high-level programming language with an eclectic heritage
written by Larry Wall and a cast of thousands. It derives from the
ubiquitous C programming language and to a lesser extent from sed, awk,
the Unix shell, and at least a dozen other tools and languages. Perl's
process, file, and text manipulation facilities make it particularly
well-suited for tasks involving quick prototyping, system utilities,
software tools, system management tasks, database access, graphical
programming, networking, and world wide web programming. These strengths
make it especially popular with system administrators and CGI script
authors, but mathematicians, geneticists, journalists, and even managers
also use Perl. Maybe you should, too.

--------------------------------------------------------------------
Show full article (1.77Kb)
no comments
  FAQ 5.3 How do I count the number of lines in a file?         


Author: PerlFAQ Server
Date: Apr 19, 2008 00:03

This is an excerpt from the latest version perlfaq5.pod, which
comes with the standard Perl distribution. These postings aim to
reduce the number of repeated questions as well as allow the community
to review and update the answers. The latest version of the complete
perlfaq is at http://faq.perl.org .

--------------------------------------------------------------------

5.3: How do I count the number of lines in a file?

One fairly efficient way is to count newlines in the file. The following
program uses a feature of tr///, as documented in perlop. If your text
file doesn't end with a newline, then it's not really a proper text
file, so this may report one fewer line than you expect.

$lines = 0;
open(FILE, $filename) or die "Can't open `$filename': $!";
while (sysread FILE, $buffer, 4096) {
$lines += ($buffer =~ tr/\n//);
}
close FILE;

This assumes no funny games with newline translations.

--------------------------------------------------------------------
Show full article (1.62Kb)
8 Comments