Hello all,
I have a ms access db that spits out all the zip codes of our
subscribers. I'd like to write a program that can parse, group, and
count like numbers, eventually for relay to a graphic interface. Being
new to perl, where is a good place to start? I'm sure there are many
programs wri
Hello,
I'm trying to open (create if necessary) a file for APPEND, that will
serve as a log. The script I'm using will open a file, but fails to
print anything to it. Any advice?
my $filename = "open_file.txt";
open(APPEND, ">> $filename")
or die "Couldn't open $filename for appendin
Hello:
I've long used Perl's "in place edit" feature, and understand it and regex
fairly well, e.g.:
perl -i -p -e "s/oldhostname/newhostname/g" /etc/hosts
However, what is the syntax if I wanted to just process a text stream to
stdout?, e.g.:
cat /etc/hosts | perl "s/in_text/out_text/g"
I'm
traceback.print_exc(file=r)
r.write('\n')
Thank you very much for any help you can provide!!
Lance Ellinghaus
TWAI Operations Integration/Special Projects
Work Phone: 214-922-6458
Work Cell: 972-877-0409
Nextel:
ms far more elegant to me. I'm hoping to be
a Perl idiot savant someday, but I obviously have a ways to go (at least in the savant
category).
Thanks!
Lance
-
"Better
s D'Anconia" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> Lance wrote:
> > Hi,
> >
> > I am writing a Perl script ( on a Pentium1 RedHat box ) to monitor some
> > websites on some webservers. There are about 20 servers with 5 sites
each.
>
try www.cpan.org
It's for all things Perl. ;-)
"Joel_divekar" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> Hi All
>
> I am using Activestate Perl on win9x and wish to install crypt-blowfish
module. Activestate module repository does not have this module. Any advice.
>
> Regards
>
You could 'delete' or 'undef' variables you don't want. But I sense that
you want a bigger wiper than that...
If you define variables using 'my' in the sub, Perl's gargbage collection
should annihilate them when it has time/needs resources. It might even
eliminate them as soon as you exit the sub
Hi,
I am writing a Perl script ( on a Pentium1 RedHat box ) to monitor some
websites on some webservers. There are about 20 servers with 5 sites each.
I have been playing with running various parts of the script in parallel, to
try to get a perfomance boost, but am at a quandry. If I run the che
I think something like:
if( $_[1] ) ? $m = $_[1] : $m ='text/plain';
might work. Try looking up the perl 'trinary' operator.
"Dan Muey" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
com...
Hello
What I want to do is assign the value of $_[1] to $m unless it's empty then
assign
www.perldoc.com search for File::Find. It does the recursion for you!
"Prasad Karpur" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> I am new to Perl and would like to know how to look into every
subdirectory. Any help would be greatly appreciated.
>
> #!/usr/bin/perl
>
> #use str
if you are just trying to access a set of nested arrays, use something like
my @parent=([1,2,3],
[7,8,9]);
print "$parent[0][1]\n";# outputs 2
print "$parent[1][2]\n";# outputs 9
## now to access the the info, use references
foreach my $num(@parent){
foreach my
something like:
foreach my $key( keys %hashA ){
if( $hashB{$key}){ print"do the dance of joy, duplicate key found" }
}
should do the trick.
"Aimal Pashtoonmal" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> Hello people,
>
> Can any one please help me. I have 2 hashes, hashA a
ow can I return
discrete arrays and hashes from a subroutine?
Grateful for any help!
Lance
--
This message may contain confidential information, and is intended only for the use of
the individual(s) to whom it is addressed.
==
go to the microsoft site and look for VB script.
http://msdn.microsoft.com/library/default.asp?url=/nhp/Default.asp?contentid
=28001169
"Rod Crowder" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
> As I said, please don't shout at me
>
> A situation has arisen at work, where a new
you might want to start with
http://www.perldoc.com/perl5.8.0/pod/perlfunc.html#Alphabetical-Listing-of-P
erl-Functions
and look for 'fork'
warning: there is no fork for win32, you have to use theWin32::Process
module.
"Madhu Reddy" <[EMAIL PROTECTED]> wrote in message
news:[EMAIL PROTECTED]
>
I told you my 'nix was rusty... ;-)
"Gary Stainburn" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
> Hi folks,
>
>
> On Wednesday 19 Feb 2003 9:15 am, Lance wrote:
> > On a Unix system you could use 'lc
On a Unix system you could use 'lc' to count the lines and 'top' or 'tail'
to read the first or last lines. My Unix is getting rusty, but there are
functions to do what you want - so you could do something like:
my $linecount = `cat file.txt| lc`;
to get the line count. I'm sure that the lc comm
Go buy, beg, borrow or steal ;-) 'Learning Perl'. It is the *best*
introductory programming book yet written. Not that I am biased or
anything...
"James Parsons" <[EMAIL PROTECTED]> wrote in message
725FADC37060D6118A02000255477DC00152FE8F@ETR_NT4">news:725FADC37060D6118A02000255477DC00152FE8F
You have to place a REFERENCE to an array into another array:
--
@jon = qw/ "jon" "hansfelt" "123-1122" /;
@ben = qw/ "ben" "jones" "222-1231" /;
@marsha = qw/ "marsha" "padgett" "333-9087" /;
@abe = qw/ "abe" "johnson" "421-4623" /;
@address = ( \@jon, \@ben, \@marsha, \@abe);
-
Remember that the perl is being run server-side. It won't be able to read
form values on the same page ( unlike JavaScript ). You have to submit to a
cgi script, which can then read the various form values.
"Guy P" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]..
Check out Data::Dumper, you'll love it! www.perldoc.com
Pass it a ref and it prints out a pretty data structure recursively, so you
don't have to! Ain't Perl Grand?
"Barry Kingsbury" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
> I have created the following
you're probably right. Danger, Will Robinson! ;-)
> Very few things are impossible in Perl. I remember to have seen some
> way to access the lexical variables of the calling subroutine. If I
> had to I would find it, but ... you don't want to do that.
>
> If you want other procedures to be able
That's right!
Thanks a lot ,Lance
Probably u have diverted ( for good) me again to my first idea thought many
days back - but doesn't know much about this process - u have already told
me how to run perl file usiing bat
pls tell me how to put a bat file as a schedule task .
is it s
there are a couple of windows api modules you might want to look at on
www.cpan.org On windows machines, I usually make a bat file that simply
calls my perl script, and put the bat file in the scheduled tasks list.
eg
runme.bat contains:
::
perl -w runthisscriptorelse.pl
::
And that's it!
"
This will save you a world of hurt:
use strict;
and test your scripts with
perl -cw scriptname.pl
This tests your scripts for syntax errors - great for debugging!! If you
are calling modules from a directory outside of the normal perl @INC:
perl -cwI /weirdDirectory scriptname.pl
It took me
My first thought is to make a little cgi script, but you don't have a
webserver...
What O/S is on the desktops? More importantly, what scripting or
programming language do they have in common? You can make a script or
program in you choice of language. As long as it supports running other
langu
Thanks guys! I did not think that it was possible, but some Perl guru
might be able to prove me wrong. I just did not want to pass references
into the subs, as a) I have nested loops, with nested subs b) Looking for
an easy way to do it. c) growing my meager Perl skillz.
So I have:
List". Any help would be appreciated and a true solution worth a
Six Dollar burger & movie via PayPal (in other words, I'll pay out of pocket).
Thanks,
Lance
--
This message may contain confidential information, and is intended only for the use of
the individual(s) to whom it is addressed.
==
$store{badMailSent} ne 'sent' ){
mailIt( $$store{emailMessage}, "$$store{name} is
non-responsive", 'bad', $$store{email});
}
}
Now, from within my mailIt sub, can I access $$store or $$server? I get the
error message: "Global symb
You are probably going to have to loop through the list, looking in it for
the data input:
my $input = 'undef';
my @possible_list = ('one', 'two','three');
until ($input eq "exit")
{
print "\nPlease type one of @possible_list ";
chomp ($input = );
foreach my $entry( @possible_list )
iated
Lance
### Solaris 9 (breakes on make)
make
[...]
/usr/ucb/cc: language optional software package not installed
*** Error code 1
make: Fatal error: Command failed for target `ClientWin.o'
Current working directory /export/home/murraylk/perl/Tk800.024/pTk
*** Error code 1
make: F
y spring
for a Carl's Jr "$6 dollar burger & Lord of the Rings "The Two Towers" ticket
(all via-Paypal) if anyone has a solid solution.
Thanks,
Lance
-
#!/usr/bin/perl
print "Lance Murray, In
t a scaler (e.g., $reply
= `echo " " | telnet $host $port`;), but I'm not sure how a scalar handles or
characters. Anyway, the solution is probably obvious to someone, and I'd be
really grateful if they'd share it.
Lance
-
Michael,
I have one question about you suggestion. From the way it looks you have
"Public" including all the other partitions. If I wanted to have CSP be the
"Dominate" partition I would flip-flop the two.
Is that correct?
Thanks
Lance
my %partitions
partition eq "GOLD" or $partition eq "Public"
or $partition eq "OPSEC SDK" then write to a file called "CSP"
Does that make sense?
Thank you in advance
Lance
-Original Message-
From: david [mailto:[EMAIL PROTECTED]]
Sent: Friday, September 27,
:" ."$title". "::"
.."$partition". "::" ."$date\n";
close(ADVANCED_ALERTSFILE)|| die "can't close
$file: $!";
}
if ($partition eq any(qw/"Public" "OPSEC SD
l line 6.
BEGIN failed--compilation aborted at test.pl line 6.
make: *** [test_dynamic] Error 2
Any help would appreciated
Thank you in advance
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
print CSP_ALERTSFILE"$oid". "::" ."$title". "::"
.."$partition". "::" ."$date\n";
close(CSP_ALERTSFILE)|| die "can't close
$file: $!";
}
# pr
is the last
item in the list."
Any Ideas?
Thank you in advance
Lance
-Original Message-
From: Mark Anderson [mailto:[EMAIL PROTECTED]]
Sent: Thursday, September 26, 2002 7:04 PM
To: Lance Prais; Perl
Subject: RE: "Or" Syntax
If you are comparing numbers, you want to use ==
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
. Title Icon
3. Title Icon
4. Title Icon
Etc
Thank you in advance
Lance
open (WHATSNEWFILE, "< $whats_new_index_txt_filename") || die "can't
open $file: $!";
while () {
chomp;
$file_line = $_;
$file_line =~ s/[\t\n\e\f\r]//
Let me ask this then. If I wanted to work around the fluctuations, could I
just search for a string in the doc rather the going to a position and only
looking there?
If so does anyone know of documentation on the web that would help me with
this?
Thanks
Lance
-Original Message-
From
notice there is a tb added to the script.. Anyone have an Idea to why
this occurring.
Below you will see the script
Thank you in advance for you help
Lance
#!/usr/bin/perl
my $count = 0;
open MAIL_LOG, ">> siebel_mail.log" or
die "can't append to siebl_ma
{
Do this
This does not seem to be working.
Thanks in advance
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I declare like that all of the time on WinNT and it seems to work fine.
Anyway, if you do the 'perl -c -w scriptname.pl' test AND use strict, any
syntax errors will become (painfully!) obvious ;-)
"A Taylor" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
> Hi a
I am not sure if I am going to ask this question correctly therefore, please
ask as many questions as you need to understand.
My situation is a follows: I have a perl script that extracts data from a
list then processes this information and outputs is to HTML. I am working
off someone else cod
My vote is for "Learning Perl" followed by "Programming Perl" followed by
the "Perl Cookbook" all O'Reily books.
"David Fisher" <[EMAIL PROTECTED]> wrote in message
000201c22e89$d4b7d590$[EMAIL PROTECTED]">news:000201c22e89$d4b7d590$[EMAIL PROTECTED]...
> Ok, I need to ask you guys for some hel
I just tried it, and it does not work for me either. I too run on win2k.
I have always just put the code in a file or a module and executed it that
way. At least if you save them you will have a record of your progress.
"Cory" <[EMAIL PROTECTED]> wrote in message
001c01c22d40$b4107710$7c33aa18@
Are you looking for how many elements the array has? If so:
$lastElement = $#array;
"Konrad Foerstner" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
>
> sorry a small but important mistake
>
> Im looking for a method to extract the
> biggest element (number)
. 2/97 subtests failed, 97.94% okay.
make: *** [test_dynamic] Error 29
Thank you in advance
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
installed the correct module.
Thanks
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I am getting the following error when I execute my script. It is not
erroring out nor is it not working as I think it should. I am just curious
why this is happening. Any Ideas?
Thanks
Lance
CODE:
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time);
ERROR:
Name "
> 2
{
Do something
}
But it does not seem to be working
Sleeping for 20 second
Sleeping for 10 second
Sleeping for 50 second
Sleeping for 40 second
Sleeping for 30 second
Sleeping for 20 second
Sleeping for 10 second
Thank you in advance.
Lance
--
To unsubscribe, e-mail: [EMAIL PR
I am getting the following error when using use::send mail.
E:\sea621\siebsrvr\BIN\Perl\bin>outlook.pl
Global symbol "%mail" requires explicit package name at
E:\sea621\siebsrvr\BIN\P
erl\bin\outlook.pl line 21.
Global symbol "%mail" requires explicit package name at
E:\sea621\siebsrvr\BIN\P
erl
ccurrences > 2
{
Do something
}
But it does not seem to be working
Sleeping for 20 second
Sleeping for 10 second
Sleeping for 50 second
Sleeping for 40 second
Sleeping for 30 second
Sleeping for 20 second
Sleeping for 10 second
Thank you in advance.
Lance
--
To unsubscribe, e-mail: [EMAIL PR
Is it possible to delete a file or remove all the data using a perl command?
I am using perl on windows, can you include dos commands within perl
I tried to include Del in my script and it blew up.
Thanks
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail
to my
original script/strategy. BTW, super great code
was not going to score on this exam, it
was only about the strategy. They didn't even
ask for it in computer code. I was just wanting
to hone my coding skills on a word problem.
-lance
__
Do
from scheduler it will
reopen an new txt file but form some reason with in this loop it fails. Any
Ideas?
Thank you in advance
Lance
#/usr/bin/perl
while (1)
{
# RUN EVERY 10 SECONDS
sleep 10;
$cmd="";
$cmd = '..\\..\\srvrmgr /g apollo.ts.checkpoin
txt
thanks for the heads up about the hash-switch
coding style. Sometimes I learn more from
particular applied examples rather than generalities
in the books.
-lance
__
Do You Yahoo!?
Yahoo! - Official partner of 2002 FIFA World Cup
http://fi
"tries to load that Spyware program GATOR."
This is a college computer science dept
linux server what's up with the claim
that Gator is on itisn't Gator some sort
thing for the commerce world?
-lance
--- [EMAIL PROTECTED] wrote:
> Nothing Happens except you
sr_stst_id
FROM
s_srv_req a
WHERE sr_num = ?");
$get_case_text->execute($sr_num) || $dbh->errstr;
($sr_num,$sr_title,$sr_stat_id) = $get_case_text->fetchrow_array();
$get_case_text->finish;
}
ETC..
Janek,
I tried that originally with the same results. I am perplexed to why this
is happening, anyone have any ideas?
Thanks
Lance
-Original Message-
From: Janek Schleicher [mailto:[EMAIL PROTECTED]]
Sent: Thursday, May 30, 2002 8:11 AM
To: [EMAIL PROTECTED]
Subject: RE: Problem
http://grace.evergreen.edu/cgi-bin/cgiwrap/millan06/300.pl
-lance
__
Do You Yahoo!?
Yahoo! - Official partner of 2002 FIFA World Cup
http://fifaworldcup.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
inish;
print "--> SR(bulk): $case->{sr_num}\n";
print "--> User Id(name): $case->{sr_title}\n";
$line++;
}
close(BULK);
$dbh->disconnect;
-Original Message-
From: Chas Owens [mailto:[EMAIL PROTECTED]]
Sent: We
27; around the? Like so '?'
Or "?", I get an error message therefore I know I am not going down the
write path. Could it have something to do with permissions? I have them
set for execute.
Thanks
Lance
-Original Message-
From: Chas Owens [mailto:[EMAIL PROTECTED]]
Sent:
oing wrong?
Thank you in advance
Lance
#!/usr/local/bin/perl
#
# Purpose: To extract Daily Siebel (SecureTrak) cases
#
# Written by Lance
#ENVIRONMENT VARIABLES
$CUSTOM = "/data/verity/custom-kb";
$SERVICE= "X.world";
$oracle_user
oing wrong?
Thank you in advance
Lance
#!/usr/local/bin/perl
#
# Purpose: To extract Daily Siebel (SecureTrak) cases
#
# Written by Lance
#ENVIRONMENT VARIABLES
$CUSTOM = "/data/verity/custom-kb";
$SERVICE= "X.world";
$oracle_user
oing wrong?
Thank you in advance
Lance
#!/usr/local/bin/perl
#
# Purpose: To extract Daily Siebel (SecureTrak) cases
#
# Written by Lance
#ENVIRONMENT VARIABLES
$CUSTOM = "/data/verity/custom-kb";
$SERVICE= "X.world";
$oracle_user
I have written a Perl script that needs to be executed every 10 seconds.
How would I go about doing this. I am working with Perl on NT and using
scheduler and the lowest I can set it to is 1 minute.
Thank you in advance
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional
-Original Message-
From: Lance Prais [mailto:[EMAIL PROTECTED]]
Sent: Friday, May 24, 2002 1:38 PM
To: Perl
Subject: something strange
I am not sure if this is the right place to ask this but I was hoping
someone hashad a similer problem.
Here is my issue, I am running perl on NT and
:Sendmail::log;
}
else
{
print "Successfully Completed Email Manager Working\n";
print substr($line, 106, 21);
}
Thanks
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
One more question, how can I make it that it is not case sensitive when find
something out of a text doc?
Thanks
Lance
-Original Message-
From: drieux [mailto:[EMAIL PROTECTED]]
Sent: Thursday, May 23, 2002 4:58 PM
To: Lance Prais
Cc: begin begin
Subject: Re: subsrting question
On
print "Successfully Completed Email Manager Working";
print substr($line, 105, 16);
}
-Original Message-
From: John W. Krahn [mailto:[EMAIL PROTECTED]]
Sent: Thursday, May 23, 2002 4:17 PM
To: [EMAIL PROTECTED]
Subject: Re: subsrting question
Lance Prais wrote:
>
Thank you in advance,
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
;emailmgr.pl
Can't locate Mail/Sendmail.pm in @INC (@INC contains:
E:/sea621/siebsrvr/BIN/lib
E:/sea621/siebsrvr/BIN/site/lib .) at E:\sea621\siebsrvr\BIN\emailmgr.pl
line 3
0.
BEGIN failed--compilation aborted at E:\sea621\siebsrvr\BIN\emailmgr.pl line
30.
Then placed sendmail.pm in the
All,
I am trying to "use Mail::Sendmail" to send mail. The problem is that
the sendmail is in the right folder. The only thing that comes to mind is
that I am doing this on NT
The path for the sendmail.pm is perl/lib/mail/sendmail.pm
I am getting the following error:
E:\sea621\siebsrvr\
HOW CAN I SEND MAIL USING PERL ON NT? DOES ANYONE KNOW OF EXAMPLES THAT
ARE OUT THERE ON THE WE?
THANKS
LANCE
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I am getting the following error, does anyone know what could be causing
this?
No recipient addresses found in head
Thanks
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
with the script and the variables did not pass but work fine on
Server_1
Thanks
-Original Message-
From: David Gray [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 13, 2002 12:42 PM
To: 'Perl'; 'Lance Prais'
Subject: RE: CGI QUESTION
> I have a question regarding p
Showalter [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 13, 2002 10:42 AM
To: 'Lance Prais'; Perl
Subject: RE: CGI QUESTION
> -Original Message-
> From: Lance Prais [mailto:[EMAIL PROTECTED]]
> Sent: Monday, May 13, 2002 11:15 AM
> To: Perl
> Subject: CGI QUESTIO
.
Is my assumption correct?
I am attempting to use the variables by the following code:
(param('account'))
Is that correct?
Thank you in advance
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Exiting
I am jdk1.3. I have installed all the recommended patches in the
README.sparc file but no luck. Also this connect string works in other
scripts with in the application.
-Original Message-
From: John W. Krahn [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 06, 2002 4:55 PM
To: [E
: $DBI::errstr";
Error Message:
Can't connect( HASH(0xf696c)), no database driver specified and DBI_DSN
env var not set at ./daily_sr.pl line 19
Thank you,
Lance Prais
Check Point Software Technologies, Inc.
817-606-6505
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I am using the following code to extract data from a db and write to a file
and getting errors that I am not familiar with: Does anyone know what I am
doing wrong?
#!/usr/local/bin/perl
#ENVIRONMENT VARIABLES
$CUSTOM = "/data/verity/custom-kb";
$SERVICE= "xx
Hello,
How do you compare dates to see if dates are "between"?
For example in SQL I would do it like this to find the values between now
and seven days prior:.
X is Between(sysdate-7) and sysdate
Thank you,
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAI
I would like to create a unique list. For example, I have two separate
lists of solution ids and there is the potential of over lapping results.
How would I best eliminate the duplicates and have a unique list of results.
Does anyone have an example of some code they used to do this?
I am trying
WorkMon 27239 Exited with error Background
04/04/2002
5 rows returned.
Thank you again.
Lance
#open a file with the filehandle
open WORKFLOW, "+<..\\..\\workflow.txt" or die "Cannot open Workflow $!\n";
$counting_runners = 0;
while (){
you in advance
Lance
#/usr/bin/perl
#open a file with the filehandle
open WORKFLOW, "+<..\\..\\workflow.txt" or die "Cannot open Workflow $!\n";
for(my $i=0; $i<22; $i++){}; #This will put you at row 23.
$_=;#set the v
reverent information is stored in the "Doc Table" We
want to grab the solution Id and use a perl script to get the title from
this table and send it back to the page.
Does anyone know how to do this?
Thank you in advance
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additiona
I have a perl script that generates information that I need to output to and
excel file. Does anyone have an example of how to do this?
Thank you in advance
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I am working on a Solaris box. So I will try the winExcel, hopefully that
will solve this.
Thank You
Lance
-Original Message-
From: John Edwards [mailto:[EMAIL PROTECTED]]
Sent: Thursday, January 31, 2002 7:50 AM
To: 'Lance Prais'; PERL
Subject: RE: Writing to a file
W
?
Thank you in advance
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
If I wanted to schedule a script to run every five minute what would the
syntax be?
Thank you in Advance
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
What do I need to do to run CGI Scripts on a NT box?
Thank you
Lance
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I want the following statement to do something if either of this conditions
exist. "or" Statement
if ((substr($_, 42, 7) eq "Running") || (substr($Nextline, 42, 7) eq
"Running"))
It is reading the right substrings but failing.
What am I doing wrong?
--
To unsubscribe, e-mail: [EMAIL PROTEC
at row 23.
$_=;
my $line=$_;
my $nextline=$line++;
if ((substr($line, 42, 7) eq "Running") || (substr($nextline, 42, 7)eq
"Running"))
Can anyone see what I am doing in correct?
Thanks
Lance Prais
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional c
Does anyone know how to grab the server time to include it in a file?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
If I want to write to a log file to track errors.
1. Open the file
2. Write to the file
3. Close the file
Is that the correct psudo-code
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I am sorry I asked this question a while back but my computer crashed and
lost all my documentation.
I am trying to output text from a doc. that I am reading to an email I am
sending but it is not working.
Here is my code:
print STDERR "\nline: ", substr($line, 43, 7); ---This outputs th
1 - 100 of 126 matches
Mail list logo
