IIRC the warning is intentionally suppressed if the alleged 'reserved
word' is uppercase, i.e. it will complain about "open f,$file" but
not "open F, $file".
On Sat, 27 Oct 2001, Jan wrote:
> Date: Sat, 27 Oct 2001 20:39:48 +0200
> From: Jan <[EMAIL PROTECTED]>
> To: [EMAIL PROTECTED]
> Subject:
I have Apache 1.3.20 running on my Win2k machine so maybe this'll help you.
In the http.conf file, I use the defaults except the following line is
uncommented so it'll use the Windows registry instead of the shebang line:
ScriptInterpreterSource registry
In "C:\Program Files\Apache Group\Apache
Hello Walter,
Saturday, October 27, 2001, Walter Grace <[EMAIL PROTECTED]> wrote:
WG> I have a script that is called from the web that has 'warn' statements
WG> embedded.
WG> Regarding the 'warn' statements: Where does STDERR output get sent by default?
WG> How can I redirect it to a specif
Hello Maxim,
Saturday, October 27, 2001, Maxim Goncharov <[EMAIL PROTECTED]> wrote:
MG> I need help with understanding what is happening when I fork a
MG> process.Here is actual code:
you did not 'fork' process. 'fork' is very special function, see
perldoc -f fork
man fork
for nore information.
I have a script that is called from the web that has 'warn' statements
embedded.
Regarding the 'warn' statements: Where does STDERR output get sent by default?
How can I redirect it to a specific file?
TIA
Walter Grace
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands,
HI everyone,
I need help with understanding what is happening when I fork a
process.Here is actual code:
#!/usr/bin/perl -w
use strict;
use Fcntl qw(:DEFAULT :flock);
use POSIX;
#use Mail::Mailer;
my ($pid);
$pid = open(HHH,"| infloop");
if($pid){
print HHH "bla bla \n";
}
where infloop i
On Sat, 27 Oct 2001, Jan wrote:
> sub open
> {
> open("compu","+<$port") || die "opening $port failed: $!";
> system("stty 19200 -echo cstopb cbreak -parenb cs8 parodd < $port");
> compu->autoflush(1);
> print "\nopened interface on port --> $port\n";
> }
Where I am getting confused is how you a
Uh, ok, wait, let me catch a working version
one of the versions I coded... dunno if it works how I want it to work, but
produces the error...
--
#!/usr/bin/perl
use strict;
use warnings;
use IO::Handle;
###
my $port;
my $loop;
my $start;
my $reset;
my $setdi
On Sat, 27 Oct 2001, Jan wrote:
> i just coded a little programm as an interface between a hardware interface
> on the serial port and a database, but when i use strict, perl always makes
> complaints like:
>
> Unquoted string "iface" may clash with future reserved word at
> iface2dbgeneric.pl li
Hi out there,
i just coded a little programm as an interface between a hardware interface
on the serial port and a database, but when i use strict, perl always makes
complaints like:
Unquoted string "iface" may clash with future reserved word at
iface2dbgeneric.pl line 274.
iface is the fileh
On Sat, 27 Oct 2001, Brett W. McCoy wrote:
> On Sat, 27 Oct 2001, David Gilden wrote:
>
> > cold:~/cgi$ perl -pie 's/;"\);/"\);/ ' *
> > Can't open perl script "s/;"\);/"\);/ ": No such file or directory
>
> Try this
>
> perl -pi -e 's/;"\);/"\);/g' *
>
> Separate the -e. You might also want /
On Sat, 27 Oct 2001, David Gilden wrote:
> cold:~/cgi$ perl -pie 's/;"\);/"\);/ ' *
> Can't open perl script "s/;"\);/"\);/ ": No such file or directory
Try this
perl -pi -e 's/;"\);/"\);/g' *
Separate the -e. You might also want /g at the end of the substitution,
so it doesn't quit on the
Can anyone please tell me what is wrong here,
Thnx
Dave
cold:~/cgi$ perl -pie 's/;"\);/"\);/ ' *
Can't open perl script "s/;"\);/"\);/ ": No such file or directory
What I want to do is change all files in the current directory.
Find lines that contain:
;");
And change them to:
");
---
Hello pApA_rOACh,
Saturday, October 27, 2001, pApA_rOACh <[EMAIL PROTECTED]> wrote:
p> Hear is string that should work, at least i think so.
p> last if m/^\s*model\s*tiny.*/i while (<>);
p> Can anybody say what's wrong.
p> while <>; - Valid perl construction hence
p> last if m/^\s*model\s*tin
Hello Joe,
Saturday, October 27, 2001, Joe Echavarria <[EMAIL PROTECTED]> wrote:
[..]
JE> I think there is something missig or wrong on my
JE> script. Please let me know.
JE> The script should accept input from the command
JE> line.
JE> The script is below :
JE> ###
JE> #!/usr/
On Oct 27, pApA_rOACh said:
>last if m/^\s*model\s*tiny.*/i while (<>);
'last' is an expression, but 'last if ...' is a STATEMENT. That is the
problem -- adding a suffix condtional (like if... or while...) to an
expression makes it a statement, and you CAN'T add a suffix conditional to
a statem
On Fri, 26 Oct 2001, David Gilden wrote:
> > Sorry, I meant that to say "And it runs without 'use strict'?
>
> Yes the code works fine, untill I try to use strict
strict is very picky... but it's a good thing to use because it enforces
good, clean programming practices. In Perl6, strict wil
Hi!
Hear is string that should work, at least i think so.
last if m/^\s*model\s*tiny.*/i while (<>);
Can anybody say what's wrong.
while <>; - Valid perl construction hence
last if m/^\s*model\s*tiny.*/i
is not a Perl statement!!! But if we write somthing like
last if m/^\s*model\s*tiny.*/i
pe
18 matches
Mail list logo
