yes
Thankx
Ned
-Original Message-
From: Alvin Ramos [mailto:w...@theflux.net]
Sent: Thursday, December 13, 2012 11:10 AM
To: beginners@perl.org
Subject: Retry function?
Any one have any suggestions of a module/function/method to write a perl script
to try pinging a server then after
send it to a file it is fine. When I try to read it back I
cannot get the character or beyond.
I think this must be something simple , however I am stumped.
Any suggestions on how to read all of the characters?
Thankx
Ned Cunningham
POS Systems Development & Administra
It is advanced, environment, system variables on win2000 also :)
HTH
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
"There are two ways of constructing a software design; one way is to make
will need to change directory to
it to run your script.
Did you type in path and verify that c:\perl\bin\ is in the path?
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
"There are two ways of const
It works
Type in path at the prompt
Look in it and make sure c:\perl\bin\ is in it ?
If it isn't go to my computer and environment and add it.
HTH
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROT
Hey don't go. Some times people get cranky.
There are still a lot of smart people that are willing to help here.
Just ignore the not so smart ones ;)
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROT
Hi all.
Can anyone tell me how to place an email in an outbox for Lotus Notes to deliver?
I would like to include an attachment if possible.
I have googled and not had any luck.
Are there any modules for this?
Any scripts?
Thankx
n
Ned Cunningham
POS Systems Development
Monro Muffler Brake
Count
}
print "\n";
print "Total IP'S = $count\n";
HTH
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
-Original Message-
From:
In New York it is Point of Sale , also :)
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
-Original Message-
From: Rob Dixon [mailto:[EMAIL PROTECTED
rogram needs to be run from its current location, but the path needs to be at the
new directory?
With the above code the directory is changed and the program run, however, the
programs path is not set to the newly changed directory.
Thankx
Ned Cunningham
POS Systems Development
Monro Mu
Create a simple .bat file call the Perl script and add a pause command after it. :)
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
-Original Message-
From
Wouldn't it be better to not waste your time with this kind of response???
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
-Original Message-
From: Char
Yes,
I have looked and googled and searched aspn.
Have not been able to find an example.
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
-Original Message-
From
example. I
even have the PDK msi, but can not seem to find any examples on that either.
What would be the right way to do this?
I have used a system command in the past, but have not have 100% success on the
installation.
Any examples or direction would be greatly appreciated
Ned Cunningham
POS
py("$dfile", "$ddfile") or warn;
}
I would like to increment each file as it gets a day older, then tuning the oldest
file into a weekly file, the above does not work.
Any ideas to get me on a BETTER path.
Thankx
Ned Cunningham
POS Systems Development
Monro Muff
Yeah or taking the time to blame the users of the list.
Happy New Year!!!
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
-Original Message-
From: Tim Johnson
It's a warning. If you turn it off you wont get it :)
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
-Original Message-
From: Ajey Kulkarni [mailto:[
Hello.
I need to be able to rename a NT4 workstations computername and IP address remotely
with Perl.
Has any one a good starting point? Example scripts? Links?
Thankx
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
I would interest in this answer also.
I have a similar script, however I had to include this line in the beginning to get it
to dial.
(`rasphone -d`);
Not sure why?
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
Yes use Tk module. Very involved learning curve.
Perlapp from the Perl Development Kit creates as a default, a "stand alone"
application.
HTH
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL
Chomp
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Friday
It is local, and shared for the second system.
Possibly I could change the driver
But don't know how to to that yet either.
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROT
the WSH in Perl, but not examples.
TIA
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
-Original Message-
From: Paul Kraus [mailto:[EMAIL PROTECTED
Hello,
Does anyone know how to add a printer in Perl remotely on a NT 4 system?
I have been googling for a while and found some info about WSH and cscript, but it
doesn't work on NT. (or I haven't figured it out yet).
Please advise any possibilities that you might have.
Ned Cunn
Oh cool.
Sorry to ask more help, but I must.
What module should I donwload? Tk does not come with the standard Active Perl load.
If I make an executable with perlapp, would I need TK loaded on the target system?
TIAA
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder
, in these type of
programs.
TIA
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
lking through Dave Roth's WIN32 Perl programming in
the section on console, so I thought I would give it a shot.
Sorry if I mislead anyone, still a newbie:(
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL
print "\ch \ch";
}
next;
}
$Password .=$Data;
print "*";
}
print "\n $Password\n";
#note take out this print so it doesn't display to the user;)
Ned Cunningham
POS Systems Development
Monro Muff
HI,
What would be the best way to check for data integrity of an input?
Chomp (my $ans=);
#first make sure data is 6 digits
make sure length is 6
Thankx
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL
tmtowtdi
Ned Cunningham
POS Systems Developer
Monro Muffler Brake & Service
200 Holleder Parkway
Rochester, New York 14615
(585) 647-6400 ext 310
[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
-Original Message-
From: [EMAIL PROTECTED] [mai
HI all.
I am trying to verify that a field has only numbers
12345
13456
34x34
if it has non numbers I want to delete the non number with a zero?
Snip
$mil =~ s/[0-9]/$_/;
this returns zero.
Any help?
Ned Cunningham
POS Systems Developer
Monro Muffler Brake & Service
200 Holleder Par
HI all.
I have what appears to be a C++ file set (i.e. phone.dat, phone.idx).
My question is can Perl read these files and what modules do I need to do
it.
Any starting help would be great.
Thankx
Ned Cunningham
POS Systems Developer
Monro Muffler Brake & Service
200 Holleder Par
the 2c should fail?
Any help?
Ned Cunningham
POS Systems Developer
Monro Muffler Brake & Service
200 Holleder Parkway
Rochester, New York 14615
(585) 647-6400 ext 310
[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional comman
Does anyone have any ideas on how to display PDF files?
What modules to use?
Are there any sample scripts?
Thankx
Ned Cunningham
POS Systems Developer
Monro Muffler Brake & Service
200 Holleder Parkway
Rochester, New York 14615
(585) 647-6400 ext 310
[EMAIL PROTECTED] <mailto:ned.cun
ata{CATALOGID};
$verb = $Data{VERSION};
$updb = $Data{UPDATELEVEL};
print "$catb $verb $updb \n";
($db2->Sql("UPDATE Catversion SET VERSION =
$verb, UPDATELEVEL = $updb&qu
How would you write to those 2 hashes???
-Original Message-
From: Frank Wiles [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, October 16, 2002 11:25 AM
To: Egleton, Gary
Cc: [EMAIL PROTECTED]
HI all.
A simple question.
I need to use a system command to delete all files in a directory except
one.
Foobar.ldb
Barfoo.ldb
Raboof.ldb
Keep.ldb
I want to delete all except the keep.ldb and there could be various other
files.
I am trying to use this command
Any help???
System("erase /f e:
The first one worked great thankyou
-Original Message-
From: Nikola Janceski
[mailto:[EMAIL PROTECTED]]
Sent: Monday, July 01, 2002 3:10 PM
To: Nikola Janceski; 'Ned Cunningham';
'[
Hi,
Can anyone tell me how to print the following data so that it rounds up even
though it shouldn't
$data = "3.424";
Printf WRFILE ("%11.2f", $data);
My results are
3.42
I need it to round up even if it is only .001 ?
TIA
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additio
I am trying to update an Access database table field with a increment
number. I cant seem to place the update piece in the right place.
Is this the right path to take?
Snip
#!/usr/bin/perl
use Win32::ODBC;
$DSN = "KIDSN";
$Dir = "E:/kimcon/conv/";
$DBase = "Ki720.mdb";
$Driver = "Microsoft Acc
ile into a Hash
how is the file laid out?
-Original Message-
From: Ned Cunningham [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, June 04, 2002 2:02 PM
To: '[EMAIL PROTECTED]'
Subject
I am trying to traverse a file and match the key to a key in a second
file...
How do I put the file into the Hash???
%hash = "c:/file.txt";
I cant seem to find the magic here..
TIA
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
OK,
Now I am trying to select only records that are in both files. I am trying
to go through one file and then check if it is in the next. I am
stumped?
Snip
open VEH, $veh or die "Cant open it :$!";
open CKEY, $ckey or die "Cant open it :$!";
open WRFILE, ">$wrfile";
while (defined ($line
%9d",$newnum);
print WRFILE ";", @data, ";";
print WRFILE "\n";
}
-Original Message-
From: David T-G
[mailto:[EMAIL PROTECTED]]
Sent: Friday, May 31, 2002 11:22 AM
To: perl beginners
: perl beginners
Cc: Jonathan E. Paton
Subject:Re: Printing all elements of an Array except
the first?
Jonathan, et al --
...and then Jonathan E. Paton said...
%
% --- Ned Cunningham <[EM
Snip
open CUST, $cust or die "Cant open it :$!";
open WRFILE, ">$wrfile";
while (defined ($line = )) {
chomp $line;
@data = split(/\|/,$line);
$newnum=$newnum+1;
printf WRFILE ("0%9d",$newnum);
print WRFILE ";", @data, ";";
print WRFILE "\n";
}
close CUST;
close WRFILE;
End
I want to w
HI,
I have to read through a file (customer) and then read through a second file
(car) and find the corresponding records for each customer. I have tried to
read it into a hash, but I am a little behind the curves on hashes. The
trick is that I need to use the second delimited field in the custo
Can anyone give me a hand please?
I have a file
James T Nobel
James T. Nobel, Jr.
James and Kathy Nobel
James T Nobel
James T Nobel
I am trying to replace the spaces with a single space
My code so snippet is:
$cuname = $data[53];
$newcuname = /" "+/" "/$cuname;
But it isnt worki
I have a file that has customers names in one of the fields.
I would need to break the field into FIRST NAME, LAST NAME.
The file is of course in different formats:
Doug Smith
Fran & Doug Smith
Smith Associates
Smith, Doug
Doug A. Smith Jr.
Sr. Fran Smith
Any ideas on splitting this up??
TI
Could you add a variable that is incremented for each record???
-Original Message-
From: Tanton Gibbs [mailto:[EMAIL PROTECTED]]
Sent: Friday, May 10, 2002 3:31 PM
To: Hughes, Andrew; [EMAIL PROTECTED]
Anybody have any feed back on the Perl Development Kit???
Is it useful for a beginner?
Any advise?
Thankx
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Does anybody know what the .mst files are on AIX system?
Is there a PERL modules to read them?
Thankx
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Does anyone know where I can get the AdminMisc extension?
And what is the procedure to download it to a Nt machine?
Thankx
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
HI,
I am having a very newbie problem.
I am reading an Access database with ODBC and have my data read into
$Data{STATE}
My problem is now I need to match to 16 different states.
I have so far
If ( $Data{STATE} eq "MA" )
Process data
My question is should I use an array to test against an
To: 'Ned Cunningham'; '[EMAIL PROTECTED]'
Subject:RE: Checking Perl load
You can check to see if its in your path by typing "perl -v"
at the command
line, otherwise just use the search finc
I would be looking for a way to test if perl is loaded on a NT machine.
Does anyone have a quick answer or command line to do this?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I have Build 628 of PERL for NT.
Is this the latest and greatest??
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I guess this means nobody knows anyway to do this???
-Original Message-
From: Ned Cunningham [mailto:[EMAIL PROTECTED]]
Sent: Friday, February 08, 2002 11:21 AM
To: '[EMAIL PROTECTED]'
Hi,
I have 2 tables in an Access mdb that I need to distribute to 500 remote
sites.
I would need to copy the tables into an existing mdb that does not have
Access loaded on the system.
Can this be done with PERL?
Is there a way to copy the tables in a PERL script?
Thankx
--
To unsubscribe
What is the proper and best way to use the system command???
System('command');
Or
(system 'command');
Please help!
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
What is the proper and best way to use the system command???
System('command');
Or
(system 'command');
Please help!
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Please help.
I need to check if a files exists in the root of c. I would like to use if
else to control the response. I have tried to check the file and verify $!,
but it seems to give me a problem.
Can anyone help?
#!/usr/bin/perl
$sysname = `hostname`;
$nsname = substr($sysname,0,5);
$
HI,
I need to display a message to a NT screen. The PERL script will need to
run from a shortcut that is set to run a bat file minimized, and in the bat
file the PERL script is run. I have Win32:Console loaded but do not have TK
or Message or Msgbox.
Is there any code or a script available to
63 matches
Mail list logo