Asim Suter wrote:

It's not escaped to the shell nor to the second invocation of perl.

@VERSION = qw(aaa bbb);
$_ = `echo perl -pe 's/\@VERSION\@/1.2.3.4/g' -i $input_file`;
$_ = `echo perl -pe 's/\\@VERSION\\@/1.2.3.4/g' -i $input_file`;
$_ = `echo perl -pe 's/\\\@VERSION\\\@/1.2.3.4/g' -i $input_file`;
system qq{perl -pe 's/\\\@VERSION\\\@/1.2.3.4/g' -i $input_file};

burrell.john@yahoo.com wrote:

I notice that you are using CGI.pm's start_form() method.

That's what should happen when start_form() is called without
parameters, as in your case.

I'm not able to reproduce that behaviour. Can you give us more details?

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

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

8.39: How do I set CPU limits?

(contributed by Xho)

Use the "BSD::Resource" module from CPAN. As an example:

use BSD::Resource;
setrlimit(RLIMIT_CPU,10,20) or die $!;

This sets the soft and hard limits to 10 and 20 seconds, respectively.
After 10 seconds of time spent running on the CPU (not "wall" time), the
process will be sent a signal (XCPU on some systems) which, if not
trapped, will cause the process to terminate. If that signal is trapped,
then after 10 more seconds (20 seconds in total) the process will be
killed with a non-trappable signal.

See the "BSD::Resource" and your systems documentation for the gory
details.

to start a process in the background? I'm drawing a total blank.

Hi all,
I would like to perform xml-to-word conversion. Is there a perl module
that can perform it?
If not, maybe there are other ways to do it ..
Thanks in advance, Moti.

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

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

8.8: How do I get the screen size?

If you have Term::ReadKey module installed from CPAN, you can use it to
fetch the width and height in characters and in pixels:

use Term::ReadKey;
($wchar, $hchar, $wpixels, $hpixels) = GetTerminalSize();

This is more portable than the raw "ioctl", but not as illustrative:

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

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

8.21: Where do I get the include files to do ioctl() or syscall()?

Historically, these would be generated by the h2ph tool, part of the
standard perl distribution. This program converts cpp(1) directives in C
header files to files containing subroutine definitions, like
&SYS_getitimer, which you can use as arguments to your functions. It
doesn't work perfectly, but it usually gets most of the job done. Simple
files like errno.h, syscall.h, and socket.h were fine, but the hard ones
like ioctl.h nearly always need to hand-edited. Here's how to install
the *.ph files:

1. become super-user
2. cd /usr/include
3. h2ph *.h */*.h

Islam is the only religion which teaches the existence of a PERFECT
God. A
perfect God means that there is no sharer in His Nature and His
Attributes:

"Say: He is God, the One and Only; God, the Eternal, Absolute; He
begetteth
not, nor is He begotten; and there is none like unto Him." (Holy
Qur'an,
112:1-4)

Hi,

Can some one tell me how the below code works ???

605: @cherou= map {
606: ($nf,@narg)=split(/:/,$_);
607: &{$::{"setup_$nf"}}($type,@narg); #returns the
subformat above
608: } exists $setupstuff{$ap} ? @{$setupstuff{$ap}} :
() ;

And also pls let me know wts mean by &{$::{"setup_$nf"}}
($type,@narg).

Is $:: used to access the defs from the other packages ???

Best Regards,
Sburam

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

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

8.37: How do I find out if I'm running interactively or not?

Good question. Sometimes "-t STDIN" and "-t STDOUT" can give clues,
sometimes not.

if (-t STDIN && -t STDOUT) {
print "Now what? ";
}

On POSIX systems, you can test whether your own process group matches
the current process group of your controlling terminal as follows:

use POSIX qw/getpgrp tcgetpgrp/;