Webmaster Forum / Perl / Getting Started / July 2009

Hello everybody, I have two lists and I want to merge them like this:
   element 1 of list A, element 1 of list B, A2, B2, A3, B3, etc.
I need this to create a sequence of key/value for an anonymous hash.
I'm using this code:

Hi list memebers. I'm new here and I'm interested in learning about
Perl. I've managed to get some programs together but have a lot to
learn.
May I put a question to the experts?

I almost have this but cannot figure out why its not showing the data,
right now it knows how many entries im putting in because it spits out
that number of rows.
I am getting my data from dbd::mysql, it works because i have tested in

I was reading Higher Order Perl[1] last night and, dishearteningly,
got stuck on chapter one.
Mark Dominus offers the following as a  binary string conversion
example of how recursion can work.

I'm trying to learn to develop Perl modules in an effort to have clean directory structure and more reusable code.
I'm hitting a little snag in my test code that I don't quite understand. I'm hoping someone can help explain where I may be going wrong here.
The error I'm receiving ...

I have a general perl question.
I'm on OSX running a program from the command line. That program asks a
series of questions, which I interactively answer.
I would like to use perl to run the program (this part is not the problem)

Dear User!
I want to get all telephone and mobile number from a string and save into a variable. Here is my example what i am doing.
#!/usr/bin/perl
$str = "This is my string my mobile number is 0300-4459899, 042-8494949 041-8580880 now the string is complete"

I need to edit a config file using perl cgi  script. i.e., Search with the
'key' string and edit the 'value'.
For eg: below is what I have in the config file "configfile.cfg".
Key1=OldValue1

I am trying to use the '-e' filetest operator and encountered some wired behavior.
I have a tar.gz file which is around 2.6 G and this is the code...Tar.gz file is in the same directory where script is executed.
unless (-e $file) {
print ("ERROR: $file does not exist\n");

    Is there a well-written threading TCP server module for perl? I want a module that manages threading itself and utilize Posix Threading for performance.
--------------
XUFENG
2009-07-09

I've got a couple of simple questions. First, I know that the below line
is not correct, but instead of having someone correct it, I'd rather
learn more about the Perl debugger, and the map function.
I'd like to replace 'h_' with 'hello_' in each key name in %hash, but

I need an order for hash by user preferences. Because the criterion to order the hash entries a not numerical and not should sorted alphabetical, I tried following
  3 %hashToSort = (
  4     "a" => "one",
  5     "b" => "two",

The script below is my first usage of perls `chmod', but it appears to
be in keeping with the info at perldoc -f chmod.
But somehow in the print of $mode it turns into 493... even though it
is set to 755.  Its just the print though... the actual chmod appears

I am writing a perl script which creates a file (on Linux/UNIX) using
system's date.
e.g. log_2009-07-07.gz
Here is the code I wrote.

what's the standard module for accessing MSSQL?
I searched on CPAN but found a lot.
The program should be run on Linux, not Windows.
Thanks.