Webmaster Forum / Perl / General Perl Topics / September 2008

split seems to be a suprisingly tricky beast ;-)
To quote S29:

I  am trying to find all directories of a certain name.
I use `find . -name certainName -type d`;
I do not need to go below the current directory.
I tried adding -depth 1 to find but that doesn't do what I want.

Hi,
How can I fix the following code?
$ cat -n oo-test.pl
    1  #!/usr/bin/env perl

Here's my codes to match the following strings:
while (<>)
{
 chomp;

Hello.
I have to use a long perl script which use the "tainted mode" (-T
option), but the hoster we use doesn't allow this option unless on
dedicated server (and, of course, we can't pay a dedicated server).

I am trying to edit some bioinformatic package written in perl which
was written to handle DNA sequence of about 500,000 base long (a
string containg 500000 chrs)..
I have to enhance it to handle 100 million base long DNA...

Just wanted to run this through Perl gurus to see if fit is correct?.
I have a file that could possibly be 1GB in variable length EBCDIC
data. I will read the file as EBCDIC data and based on some criteria
split it into 100 different files which will add up to the 1GB. This

Hi,
Please take a look at the following program:
$ cat -n oo-test.pl
    1  #!/usr/bin/env perl

This should be simple enough, but I can't quite remember the logic and
I can't find the answer.
I'm trying to prevent 4 or more occurences of any repeating
characters. This is what I've been using:

Dose perl has functions like the UNIX command sort and uniq can output
duplicate lines and unique lines?
There's my codes, what if I run this it will output many lines but I just
want to save the duplicate line just once and unique line.

Using Perl, I want to search for a binary data containing & and
alphabets and replace with another string. I am getting an error as
put below:
bash-3.2# echo fsdalf&l91Afjkdf | perl -p -e 's/l91A/l2A/g;'

When I google catalyst vs whatever, I keep getting pages of hits about
some benchmark test.
IMO: execution speed is important, but it is not the only thing in the
world. I am also interested in speed of development, ease of learning,

I am trying to speed up a few perl scripts by forking them.
Unfortunately, I need to pass back to the parent.
I am using named pipes at other places, but this time, I wanted to use
shared memory (this being on *nix).

Hi, all:
I wrote a Perl script. It invokes an application at some steps. If the
application is running or is waiting in the license queue, then
Control_C would terminate the application. But it does not terminate

This is an excerpt from the latest version perlfaq2.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