Hai everybody,
I am getting the problem(perl.exe application error) while using the following perl
script with fork. Can you please clarify?
windows os/ perl ver-5.6
ERROR:
The instruction at 0x023b1c53 referenced memory at 0x0002. The memory could
not be read.
Click on OK to terminate
I am using the Win32::Printer module and the output is always blank pages.
Anyone else experienced this problem? Any fix? Any other options for Win32
printing?
John Godish
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe:
Guys,
I'm checking a variable with a pattern match...
$id = * unless ($id =~ /\d{1,3}/);
Now, this works everytime, and gives me the result I want, even if $id is undefined.
However, if $id IS undefined, I also get this message:
Use of uninitialized value in pattern match (m//) at...
So, in
So, in a script that will be distributed to others, should I
just turn warnings off
You should turn off 'strict', too, to get even faster into trouble.
Sorry, but don't even think about turning off. Handle this message or the interpreter
is right to talk about.
On the other hand this
Beckett Richard-qswi266 wrote, on Thursday, October 21, 2004 8:01 AM
: I'm checking a variable with a pattern match...
:
: $id = * unless ($id =~ /\d{1,3}/);
:
: Now, this works everytime, and gives me the result I want,
: even if $id is undefined.
:
: However, if $id IS undefined, I
Beckett Richard-qswi266 wrote:
Guys,
I'm checking a variable with a pattern match...
$id = * unless ($id =~ /\d{1,3}/);
Now, this works everytime, and gives me the result I want, even if $id is undefined.
However, if $id IS undefined, I also get this message:
Use of uninitialized
The networked drive containing the perl distribution can
appear as any letter, but perl will always be in it's root:
x:\perl, g:\perl, w:\perl
The users path can be setup dynamically to take care of this.
Pointing to LETTER:\perl\bin isn't a problem.
However - there are more than a few hard
Hi All,
I am using Net::SSH::Perl. I would like to handle errors like
1. When sshd is not running on server
2. When user/passwd is wrong.
Please help
Thanks,
Archana
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe:
$id = * unless defined $id and $id =~ /\d{1,3}/;
I usually don't do it that way, it's easier to catch it when you init
$id in the first place.
Good point $Bill.
So, what I should do is:
my $id = $botid || *;
rather than:
my $id = $botid;
which could be undefined (depending on how stupid
However - there are more than a few hard references to drive
letters (c:) in config.pm, which I understand is something
read when perl spins up. If so, I'm dead. Is this correct?
Config.pm is written at install time. You must have installed to the C:
drive. Have you tried installing to a
Hi,
One option is to always define your vars with 'undef', e.g.
my $id = undef;
# do something
$id = * unless ($id =~ /\d{1,3}/);
Alan
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Beckett Richard-qswi266
Sent: 21 October
* Beckett Richard-qswi266 [EMAIL PROTECTED] [2004:10:21:14:10:26+0100] scribed:
$id = * unless defined $id and $id =~ /\d{1,3}/;
I usually don't do it that way, it's easier to catch it when you init
$id in the first place.
Good point $Bill.
So, what I should do is:
my $id =
Lovett, Alan J wrote:
Hi,
One option is to always define your vars with 'undef', e.g.
my $id = undef;
# do something
$id = * unless ($id =~ /\d{1,3}/);
That's the same as being undefined. You'll still get the error.
--
,-/- __ _ _ $Bill Luebkert
hi...
i'm trying to play with running some apps from within a perl script. i'm
having some issues with figuring out how to capture the stdout that the app
would generate within the perl script...
a sample of code:
my $fcmd = system function arg1 arg2;
my $res = qx{$fcmd};
my $res = `$fcmd`;
my
never mind!
for anybody else needing to know...
my $fcmd = system function arg1 arg2;
my $res = qx{$fcmd 21}; works ok
my $res = `$fcmd 21`; works ok
my $res = system($fcmd); doesn't work...
if ($res =~ /foo/)
{
it passes
}
else
{
it fails..
}
the 21 essentially
bruce wrote:
never mind!
for anybody else needing to know...
my $fcmd = system function arg1 arg2;
Why do you have system in the command ?
Should be :
my $fcmd = some.exe.path.here arg1 arg2;
my $res = qx{$fcmd 21}; works ok
my $res = `$fcmd 21`; works ok
my $res =
--8---
#$_=q;steal Porch Junk;;split//;$_=q=cd0153e71;
#s/56s/45;39fs/=;y;\;s/;a28s/;;;s;$/;;;s((.))/;
#q.$_[..$..$_[10].$_[2].q.x..q.($1)]./gee/print
--8---
That's one convoluted JAPH!
I like to pick through admirable JAPH's like this in an attempt to learn
more
On 10/21/2004 10:55 PM, Allegakoen, Justin Devanandan wrote:
--8---
#$_=q;steal Porch Junk;;split//;$_=q=cd0153e71;
#s/56s/45;39fs/=;y;\;s/;a28s/;;;s;$/;;;s((.))/;
#q.$_[..$..$_[10].$_[2].q.x..q.($1)]./gee/print
--8---
Does the following help?
$_='steal Porch Junk';
18 matches
Mail list logo