-8<-- Start Bug Report 8<--
1. Problem Description:
I am running into this error when running perl Makefile.PL from svn:
[ error] '/usr/local/apache2/bin/apxs -q EXTRA_CPPFLAGS' failed:
[ error] Use of assignment to $[ is deprecated at /usr/local/apache2
André Warnier schrieb am 25.04.2010 um 12:44:56 (+0200):
> >use warnings;
> That's good. But this :
>
> >no warnings 'uninitialized';
>
> is very dubious.
I used to think so, too, but I've recently changed my mind.
> >$article_file = $q->param("articlefilename");
>
> will come back undef if :
On 04/25/10 08:57, André Warnier wrote:
Chris Bennett wrote:
...
> $article_file = $q->param("articlefilename") || '';
ok, so suppose it is "12345.html.en"
...
if ($article_file =~ /^([a-zA-Z0-9_-]+\.html.?\w?\w?)$/) {
$article_file = $1;
} else {
$article_file = '';
}
ok, matches, so it's
Chris Bennett wrote:
...
> $article_file = $q->param("articlefilename") || '';
ok, so suppose it is "12345.html.en"
...
if ($article_file =~ /^([a-zA-Z0-9_-]+\.html.?\w?\w?)$/) {
$article_file = $1;
} else {
$article_file = '';
}
ok, matches, so it's still "12345.html.en"
$article_
- Original Message
> From: Chris Bennett
> To: ch...@bennettconstruction.biz; modperl@perl.apache.org
> Sent: Sun, April 25, 2010 8:17:07 AM
> Subject: Re: Getting a / when regex should produce nothing
> Is there a better regex for .?\w?\w?
> I want a . letter letter not . letter
> or
On 04/24/10 21:38, Chris Bennett wrote:
When I run this first time, with no values from form, I get
$article_file being a / when it should be nothing. I just can't see the
error. I have tried variations with \w and dash at beginning and end,
but no go.
Debug shows blank at A, / at B
#!/usr/bin/
Chris Bennett wrote:
...
Personal observations :
use warnings;
That's good. But this :
no warnings 'uninitialized';
is very dubious.
$article_file = $q->param("articlefilename");
will come back undef if :
- there is no "articlefilename" input box on the submitted form
- there is one,
