Webmaster Forum / Perl / General Perl Topics / July 2009

Hi experts,
I have a unix dir, test and it has 100 files. I need to extract all
the lines that contain a word "keyword" key word" (case insensitive)
from each of those files and put all those lines into another file,

One of Masak's irritations with perl6
(http://use.perl.org/~masak/journal/39334) concerns interspacing POD and
code.
I ran into an analogous problem with a project I am trying to do with

I've only just started using the shorthand for the "if .. then .. else"
statement: (test) ? this : or_that;
Here's what I have:
use strict;

I want to have the match »something =~ /(.)/g« to be kept in a
 separate subroutine, because then, I can keep this at the
 start of my script. (I like to collect those parts of my
 script that I change often there.)

$ perldoc -f sprintf
   # Format number with up to 8 leading zeroes
   $result = sprintf("%08d", $number);
OK, but how do I do

I have a perl file which is called from a ksh file. In this perl
script, I have to execute a procedure and get the output parameter.
this output paramtere(proces Date) needs to be compared with an input
parameter(run_date). If both dates are not same, I need to exit out of

I have 2 sites in same server (it is dedicated one not shared)
I need to create a directory in one site by using perl-script on other
site.
Then I try to create a new directory I got error "Permission denied".

I tried to install from CPAN "DBD::mysql" and it failed saying:
Running make install
 make test had returned bad status, won't install without force
I can see that the tests are failing like so:

here is a test script that outputs a unicode string which cannot be  
represented in latin1 to a latin1-encoded file:
    my $unicode="hello \x{010d} world";
    binmode STDOUT,":encoding(latin1)";

I am trying to generate an excel report using perl. However, I am
getting below error. Below is the sample file and error quote. Can any
one suggest something?
Sample Code:

On one system I have Activestate Perl and on another I have Strawberry
perl.  both seem OK, although the Activestate one seems a bit "slicker"
[OTOH, Strawberry perl includes enough machinery to install stuff from
CPN.. I *think* that with Activestate you can only install prebuilt ...

i am calling an external command in perl on win32 as follows
my $app = 'c:\program files\foo\flarp.exe status quux';
my $spam = qx/ $app 2>&1 /;
now i need to get the status of executed command

Author: lwall
Date: 2009-07-21 03:03:38 +0200 (Tue, 21 Jul 2009)
New Revision: 27635
Modified:

I want to require a module, but let the script continue if the module
can not be found. Currently my script will fail if it can not load/
find the module.

Author: lwall
Date: 2009-07-18 18:44:26 +0200 (Sat, 18 Jul 2009)
New Revision: 27605
Modified: