Hello,
I'm beginner in Perl with CGI.
I create a two input box;
In the first input box, I'll put the ip adress.
In the second input box I'll put the port
Then when i click em submit, the cgi must make:
perl -pi -e 's/192.168.1.1/10.0.0.1/g' /opt/myfile
How I can to do it ?
Best regards,
I'm beginner in Perl with CGI.
I create a two input box;
In the first input box, I'll put the ip adress.
In the second input box I'll put the port
Then when i click em submit, the cgi must make:
perl -pi -e 's/192.168.1.1/10.0.0.1/g' /opt/myfile
How I can to do it ?
At first you need to
On 3/7/07, Jm lists [EMAIL PROTECTED] wrote:
Hello,
$s=hello,test;
the 1st statement:
$s=~s/^(\w+)/$1 /
the 2nd statement:
$s=~s/^(\w+)/\1 /
What's the difference between these two statements?
Thanks!
Not much. $1 and \1 are roughly the same. $1 is the preferred form.
For more
Whoops, that is the 64-bit version. This the normal version:
http://downloads.activestate.com/ActivePerl/Windows/5.8/ActivePerl-5.8.8.820-MSWin32-x86-274739.msi
Do I need to pay for it?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
yes, and it costs ONE HUNDRED MILLION BILLION DOLLARS.
On Mar 7, 2007, at 1:43 AM, Jm lists wrote:
Whoops, that is the 64-bit version. This the normal version:
http://downloads.activestate.com/ActivePerl/Windows/5.8/
On 3/7/07, Jm lists [EMAIL PROTECTED] wrote:
Whoops, that is the 64-bit version. This the normal version:
http://downloads.activestate.com/ActivePerl/Windows/5.8/ActivePerl-5.8.8.820-MSWin32-x86-274739.msi
Do I need to pay for it?
Only if you want support from them or some of their
Neal == Neal Clark [EMAIL PROTECTED] writes:
Neal that is a total bummer. I am reading one of his books right now. Very
Neal well written. If you read this, congratulations on beating the stupid
Neal charges Mr. Schwartz!
Unfortunately, I didn't beat the charges. The expungement merely
I'm curious... With all the buzz about MVC frameworks now, what does
Perl have for this? The only two that I'm aware of are Gantry and
Catalyst (Catalyst appears to be more complete)--are there others? And
which one would be considered the defacto standard (most widely used or
accepted)?
--
There several more. Off the top of my head I can think of:
Maypole
Jifty
CGI::Application
CGI::Prototype
This is by no means a complete list.
On Mar 7, 2007, at 10:48 AM, Tom Smith wrote:
I'm curious... With all the buzz about MVC frameworks now, what
does Perl have for this? The only two
I have a script where I am trying to use the conditional operator.
Apparently I am confused as it always evaluates false. These are the
relevant lines from the script. The scalar $initial will either be or A.
Can someone help me to understand what I clearly don't.
Input:
98,Lisa,A,Testing
Tom Smith wrote:
I'm curious... With all the buzz about MVC frameworks now, what does
Perl have for this? The only two that I'm aware of are Gantry and
Catalyst (Catalyst appears to be more complete)--are there others? And
which one would be considered the defacto standard (most widely used or
On 3/7/07, Karyn Williams [EMAIL PROTECTED] wrote:
I have a script where I am trying to use the conditional operator.
Apparently I am confused as it always evaluates false.
$initial ?
$gecos = $first $initial $last, $sid, SIR Fall 2007:
$gecos = $first
At 09:35 AM 3/7/07 -0800, Tom Phoenix wrote:
On 3/7/07, Karyn Williams [EMAIL PROTECTED] wrote:
I have a script where I am trying to use the conditional operator.
Apparently I am confused as it always evaluates false.
$initial ?
$gecos = $first $initial $last, $sid,
On 3/7/07, Karyn Williams [EMAIL PROTECTED] wrote:
if ($initial =~ ) {
You probably don't want the binding operator =~ in there, but the
string equality test eq, right? Check the perlop manpage. Good luck
with it!
--Tom Phoenix
Stonehenge Perl Training
--
To unsubscribe, e-mail:
At 09:58 AM 3/7/07 -0800, Karyn Williams wrote:
At 09:35 AM 3/7/07 -0800, Tom Phoenix wrote:
On 3/7/07, Karyn Williams [EMAIL PROTECTED] wrote:
I have a script where I am trying to use the conditional operator.
Apparently I am confused as it always evaluates false.
$initial ?
At 10:04 AM 3/7/07 -0800, Tom Phoenix wrote:
On 3/7/07, Karyn Williams [EMAIL PROTECTED] wrote:
if ($initial =~ ) {
You probably don't want the binding operator =~ in there, but the
string equality test eq, right? Check the perlop manpage. Good luck
with it!
Using the eq op still gives
Hello all,
I am trying to edit a file using html and perl. I got it working but I
wanted to know if this i the best way to do the job. I have a problem with
the first line being blank. Everytime I submit I get a new blank line at
the top of my file:
(some HTML removed)
On 3/7/07, Tom Smith [EMAIL PROTECTED] wrote:
I'm curious... With all the buzz about MVC frameworks now, what does
Perl have for this? The only two that I'm aware of are Gantry and
Catalyst (Catalyst appears to be more complete)--are there others? And
which one would be considered the defacto
Hi Chas,
Thanks a lot for your help. It did get me started. It had time
module.
Now, when I started writing a simple sendmail routine, I find
that I do not have Mail/sendmail.pm file.
(It was not included in the download)
Can you please help me by telling me where I can download it
from.
I work
From: Michael Goopta [mailto:[EMAIL PROTECTED]
Sent: Wednesday, March 07, 2007 12:13
To: beginners@perl.org
Subject: Where can I download the Perl Mail::Sendmail library module
Hi Chas,
Thanks a lot for your help. It did get me started. It had time
module.
Now, when I started writing
Karyn Williams schreef:
$initial ?
$gecos = $first $initial $last, $sid, SIR Fall 2007:
$gecos = $first $last, $sid, SIR Fall 2007;
Variant-1:
$gecos = $first;
$gecos .= $initial if $initial;
$gecos .= $last, $sid, SIR Fall 2007;
Variant-2:
Dr.Ruud wrote:
Karyn Williams schreef:
$initial ?
$gecos = $first $initial $last, $sid, SIR Fall 2007:
$gecos = $first $last, $sid, SIR Fall 2007;
Variant-1:
$gecos = $first;
$gecos .= $initial if $initial;
$gecos .= $last, $sid, SIR Fall
Rob Dixon wrote:
Dr.Ruud wrote:
Karyn Williams schreef:
$initial ?
$gecos = $first $initial $last, $sid, SIR Fall 2007:
$gecos = $first $last, $sid, SIR Fall 2007;
Variant-1:
$gecos = $first;
$gecos .= $initial if $initial;
$gecos .=
Someone posted this regex question which I can't understand for.
perl -e '$_=abc.e.i;
s/(\.\w+)?$/.out/;
print;'
the result is: abcei.out
Why is this?Please help explain it.Thanks!
_
FREE Email @ Fadmail.com -
On 3/7/07, Jennifer Foo [EMAIL PROTECTED] wrote:
Someone posted this regex question which I can't understand for.
perl -e '$_=abc.e.i;
s/(\.\w+)?$/.out/;
print;'
the result is: abcei.out
Why is this?Please help explain it.Thanks!
I think you will be less confused if you change the
Jennifer Foo wrote:
Someone posted this regex question which I can't understand for.
perl -e '$_=abc.e.i;
s/(\.\w+)?$/.out/;
print;'
the result is: abcei.out
Why is this?Please help explain it.Thanks!
$_=abc.e.i;
This is short for:
$_ = 'abc' . 'e' . 'i';
Which
$_=abc.e.i;
This is short for:
$_ = 'abc' . 'e' . 'i';
Which is the same as saying:
$_ = 'abcei';
Thanks.I never knew that it can write a string like this way.
_
FREE Email @ Fadmail.com - http://www.fadmail.com
--
On 3/7/07, Jennifer Foo [EMAIL PROTECTED] wrote:
$_=abc.e.i;
This is short for:
$_ = 'abc' . 'e' . 'i';
Which is the same as saying:
$_ = 'abcei';
Thanks.I never knew that it can write a string like this way.
You probably shouldn't though. It is a carry over from the
28 matches
Mail list logo