You could use the substitution function to do this.
$test = \nText here;
$test =~ s/^\n//; # removes that first end of line character.
R.A. Howard
-Original Message-
From: Octavian Rasnita [mailto:[EMAIL PROTECTED]]
Sent: Sunday, May 05, 2002 2:40 PM
To: [EMAIL PROTECTED]
Subject:
Hi dear all,
1. Should I write my code into perl module or simply just use a normal
include file for common sub routine that need to use on more than 1 script
(which is without adding the line package in front to make it a perl
module).
2. Does this make a different in term of script loading
Hi,
Parden me for being a dummy but I have noticed that all of my cookie files have the
same type of four number series at the end of the file. I can not find any info
explaining these in any documentation I have been able to find about cookies. I'm
wondering if it's something my O.S. does
Please forgive the stupidity of this question but I'm stumped and need
to get this program finished. I am currently working on a program that
will select information from two databases. The program puts both into
hashes and compares the two lists.
If it finds information in table one but not in
Hi,
I am strugling with my program that list the contents of a directory.
Ones the directory contains files and you have permission it shows you a doc icon
else it will show a directory-map followed by it's name as an a href
The problem I have now is that using the a href command will have to
-Original Message-
From: Teresa Raymond [mailto:[EMAIL PROTECTED]]
Sent: Sunday, May 05, 2002 2:20 PM
To: [EMAIL PROTECTED]
Subject: logout
I have the following script to logout, but when you push the back
button on the browser you can have access to the database. I would
On Sat, 04 May 2002 20:35:57 -0400, Superjeremy wrote:
I just upgraded my os and I installed apache to work on some of my
scripts.
I put the .pl files into the cgi-bin directory and chmod 755 them.
Check your httpd.conf and make sure you have either 1) set perl to
handle .pl files (via an
I am strugling with my program that list the contents of a
directory. Ones the directory contains files and you have
permission it shows you a doc icon else it will show a
directory-map followed by it's name as an a href
The problem I have now is that using the a href command
will
ok so i didnt know who else to ask this question to... and it doesent really have to
do with cgi or anything im just wondering
say you have some code:
sub read_input {
my ($buffer, pairs, $pair, $name, $value, %FORM);
$ENV{'REQUEST_METHOD'} =~ tr/a-z/A-Z/;
if ($ENV{'REQUEST_METHOD'} eq
-Original Message-
From: Nate Brunson [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 06, 2002 1:27 PM
To: [EMAIL PROTECTED]
Subject: lexical scopes vs. packages
ok so i didnt know who else to ask this question to... and it
doesent really have to do with cgi or anything im just
On 5/6/02 6:30 AM, David vd Geer Inhuur tbv IPlib
[EMAIL PROTECTED] wrote:
Hi,
Hi David,
I am strugling with my program that list the contents of a directory.
Ones the directory contains files and you have permission it shows you a doc
icon
else it will show a directory-map followed by
On Sat, 4 May 2002, Webster wrote:
I just installed Mandrake 8.2 with Apache and I'm trying to get
some of my scripts to run on it. I put them into the www/cgi-bin
directory and chmoded them to 755 I also set their owner and
group to apache But I'm still getting Forbidden...You dont
Hi all,
I know in this newsgroup nobody like to answer posts like Please, make my
homework!, and I am not talking about homework at all.
Can someone give me a little function that will receive a filename and a
string, and append this string to the file referenced by filename? My
problem is that
On Monday, May 6, 2002, at 09:35 , Rafael Cotta wrote:
[..]
Can someone give me a little function that will receive a filename and a
string, and append this string to the file referenced by filename?
you mean something like:
### sub MakeTmpFile {
### my ($file, @mlist ) = @_;
###
Ehehe.. but I don't know how to lock.
I always see examples that give me the impression that if the file is
locked, because the script is writing to the file this will fail.
Am I right or lock will wait the file stop being used and try to lock?
Rafael
Drieux [EMAIL PROTECTED] escreveu na
Well, after searching I come to this:
#---
sub WriteLog
{
open(OUTF,$filenamedate.dat) or die(Couldn't open $filenamedate.dat
for writing: $!);
# This locks the file so no other CGI can write to it at the
# same time...
flock(OUTF,2);
# Reset the file pointer to the end of
hence since we are playing the
@hash{@keys_oh_hash};
game we don't want to get that confused with the - component
http://www.wetware.com/drieux/CS/lang/Perl/Beginners/BenchMarks/complexArrayHash_v_loop.
txt
for the details on the comparison
looks like the double
hi
im able to generate records of this kind:
{
'bleh' = {
'ISHpix' = [],
'gelpix' = [],
'base' = [
''
],
'norm' = [
on Mon, 06 May 2002 08:32:11 GMT, [EMAIL PROTECTED] (Martin A. Hansen)
wrote:
im able to generate records of this kind:
my $records =
{
'bleh' = {
'ISHpix' = [],
'gelpix' = [],
'base' = [
I had been assigned a work of extracting data from a text file.The text
file has these datas
193.9.200.123,prashant , ,y,22/04/02,12:09:43, , ,
,http://rediffmail.com.
I have to fetch IP address,uesr name,date,time of log on,site or page
visited.It is the log file created by proxy server
Take a look at
perldoc -f open
perldoc -f split
[EMAIL PROTECTED] wrote:
I had been assigned a work of extracting data from a text file.The text
file has these datas
193.9.200.123,prashant , ,y,22/04/02,12:09:43, , ,
,http://rediffmail.com.
I have to fetch IP address,uesr
on Mon, 06 May 2002 09:57:02 GMT, [EMAIL PROTECTED] (En
Prashant) wrote:
I had been assigned a work of extracting data from a text file.The
text file has these datas
193.9.200.123,prashant , ,y,22/04/02,12:09:43, , ,
,http://rediffmail.com.
I have to fetch IP address,uesr
hi felix
the exists check works nicely :)
but i cant get the print to work, using my version of your sub:
sub print_record
{
my ( $record_key ) = @_;
my $record;
my $records;
# read in records
$records = read_recordfile;
foreach $record ( keys %{ $records-{ $record_key } }
following your sample If you have only one line in the text file you can
do as follow:
($ip,$name,$tuff,$stuff,$fecha,$time_log,$junk) = split /,/,$textfile;
print 'The IP address:.$ip.\n;
print The name:.$name.\n;
.
.
exit;
OK , I hope it helps you
Bernie Diaz
[EMAIL PROTECTED]
on Mon, 06 May 2002 10:21:55 GMT, [EMAIL PROTECTED] (Martin A. Hansen)
wrote:
sub print_record
{
my ( $record_key ) = @_;
my $record;
my $records;
# read in records
$records = read_recordfile;
foreach $record ( keys %{ $records-{ $record_key } } ) {
print
on Sun, 05 May 2002 13:29:28 GMT, [EMAIL PROTECTED]
(Arran Ubels) wrote:
Can anyone provide a link (or possibly write) a quick start guide
on databases in perl, i am migrating from Delphi.
See M-J Dominus' A Short Guide to DBI at
http://www.perl.com/pub/a/1999/10/DBI.html
--
felix
hi again
im practicing handling structures. im very much a newbie at this so theres prolly
something wrong with my code.
If this is what you want, maybe you have an error in your
read_recordfile?
sub read_recordfile
{
my $records;
{
local ($/) = undef;
open SOURCE,
on Mon, 06 May 2002 10:54:36 GMT, [EMAIL PROTECTED] (Martin A. Hansen)
wrote:
sub read_recordfile
{
my $records;
{
local ($/) = undef;
open SOURCE, $recordfile or die Can't open file: $!;
$records = eval SOURCE;
die $@ if $@;
close
I haven't a single line .This is a log file which has more than thousands
of line and not each data is of one line it is of two or three lines.The
data is just like
193.9.200.127,prashant , , y,12/04/02,12:09:05, ,http, ,
http://rediffmail.com, , , ,. This line has 23 fields and it may be
On May 6, Zielfelder, Robert said:
Is there a way to make Perl truncate a single scalar variable by a given
number of characters like the unix cut command can? For example, I have a
scalar variable that is 7 characters long, but for another purpose I only
want the last 5 characters of this
Please forgive the stupidity of this question but I'm stumped and need
to get this program finished. I am currently working on a program that
will select information from two databases. The program puts both into
hashes and compares the two lists.
If it finds information in table one but not in
On May 6, Darryl Schnell said:
Please forgive the stupidity of this question but I'm stumped and need
to get this program finished. I am currently working on a program that
will select information from two databases. The program puts both into
hashes and compares the two lists.
You're not using
on Mon, 06 May 2002 11:01:54 GMT, [EMAIL PROTECTED] (En
Prashant) wrote:
I haven't a single line .This is a log file which has more than
thousands of line and not each data is of one line it is of two or
three lines.The data is just like
This is hard to believe. Are you sure your
on Mon, 06 May 2002 12:36:49 GMT, [EMAIL PROTECTED] (Darryl
Schnell) wrote:
[...]
If it finds information in table one but not in table two it is to
perform certain commands to place that user in table two, and vice
versa.
[...]
Why don't you use hashes to collect your information?
Hi guys,
Has anybody seen the following message before ?
Can't locate object method connect via package DBI (perhaps you
forgot to load DBI?) at ./test.pl line 150
I would be most grateful with any advice
Thanks in advance
Tony
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional
on Mon, 06 May 2002 13:54:48 GMT, [EMAIL PROTECTED] (Tony Ho)
wrote:
Hi guys,
Has anybody seen the following message before ?
Can't locate object method connect via package DBI (perhaps you
forgot to load DBI?) at ./test.pl line 150
Yes, a few times :-)
Is there a line
use DBI;
-Original Message-
From: drieux [mailto:[EMAIL PROTECTED]]
Sent: Sunday, May 05, 2002 5:14 PM
To: [EMAIL PROTECTED]
Subject: Re: data structure
On Sunday, May 5, 2002, at 12:17 , Jonathan E. Paton wrote:
following is a shorter replacement:
print join ( : , $_-{qwdir tpl
Hello,
I've got an array of arrays, and want to sort by the 3rd element of the
subarray. I then want to print out the sorted array, showing the index and
values. E.g.,
@AoA = (
[23.56, 65.2, 12.4],
[13, 56, 87],
[45,876, 23],
etc
)
And then the printout should
take out the spaces
@sorted = {$a-[2] = $b-[2]} @AoA but this gives a cannot
^ ^
No spaces should be here
-Original Message-
From: Richard Adams [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 06, 2002 10:18 AM
To: [EMAIL PROTECTED]
Subject:
-Original Message-
From: Richard Adams [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 06, 2002 10:18 AM
To: [EMAIL PROTECTED]
Subject: Sorting problem
Hello,
I've got an array of arrays, and want to sort by the 3rd
element of the
subarray. I then want to print out the sorted
on Mon, 06 May 2002 14:17:39 GMT, [EMAIL PROTECTED] (Richard
Adams) wrote:
[Please don't retype code - cut and paste instead]
I've tried
@sorted = {$a -[2] = $b -[2]} @AoA
You forgot the 'sort' function.
You put spaces before the '-'.
You got the sort order reversed.
Try
my
On Mon, May 06, 2002 at 03:17:39PM +0100, Richard Adams wrote:
Hello,
I've got an array of arrays, and want to sort by the 3rd element of the
subarray. I then want to print out the sorted array, showing the index and
values. E.g.,
Hmm, works for me with the exception of...
I've tried
Thanks for all your help...I just forgot the sort in my post...
The reason it wasn't working wasn't the sort, it was just that $AoA[0] was
undefined..
But sort {$a-[2] = $b-[2]} @AoA[1..$#AoA] works just fine.
Thanks again!
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands,
I have a question about 'use strict' ... Yeah, I guess this counts as
a duh! question... :-)
I put 'use strict' at the beginning of one of my scripts... It
basically broke the script... (or fixed it, if you want to look at it
that way) The problem is that it wanted explicit package
On May 6, Jason Frisvold said:
I put 'use strict' at the beginning of one of my scripts... It
basically broke the script... (or fixed it, if you want to look at it
that way) The problem is that it wanted explicit package names for
all of the globals...
So, what is the proper way to
I am going to try to answer this one, (I think I understand it):
use strict;
package Foo;
my $var1;
our $var2;
package Bar;
$Foo::var1; # this how you call var1 from package Foo;
$var2; # this how you call var2 (our makes it global across packages [and
modules?]) [our == use vars qw()]
-Original Message-
From: Jason Frisvold [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 06, 2002 11:19 AM
To: [EMAIL PROTECTED]
Subject: use strict
I have a question about 'use strict' ... Yeah, I guess this
counts as
a duh! question... :-)
I put 'use strict' at the
Now I've got an array of hashes, where each hash can have different keys
e.g.,
@aoh = ( {H3 =234, H1 =127, DNA =1, p135 =167},
{H4=24, H3=1550, DNA =25, p39 =67},
{H3 =34, H2A =125, DNA =5, p32 =7},
{H3 =24, H4 =156, DNA =123, p12 =13}
)
And I'd like to
I have a directory Abs with a file abc in it.
I am using rmtree to rm this dir as follows
use File::Path;
rmtree(Abs,1,1) or die dir not del;
print done;
The output is
unlink ../htdocs/store/newpages/Abstract/abc
It neither prints the die statement nor the done -
On Sun, 2002-05-05 at 18:47, drieux wrote:
On Sunday, May 5, 2002, at 03:07 , Jonathan E. Paton wrote:
[..]
print join ( , @hash{qwkey1 key2});
sick, but it works
No, this is sick:
#array interpolation uses ' ' to join
print @hash{qwkey1 key2}\n;
Appears the array symbol is
Actually, I'm not writing a package, per se, here... (I do use 'use
strict' in my packages) ... This is the main program that I'm writing
in which I use globals... I'll start playing with the use strict stuff
in my main program since that appears to be the proper way to do
things... :)
On Sunday, May 5, 2002, at 11:24 , Jonathan E. Paton wrote:
http://www.wetware.com/drieux/CS/lang/Perl/Beginners/BenchMarks/complexArrayHash_v_loop.
txt
for the details on the comparison
looks like the double loop is faster but it may not be
in some other configuration of
Good Lord, you're gonna scare away the beginners who have questions
about perl!
Hi,
I'm a beginner that doesn't even have perl yet.
I woul like to know whether Perl is faster or Java for business
applications.
Paul has already provided the correct Party Line from the
typical Perl
Here's another simple question I have an array of arrays and I want
to use a foreach to do something with each entry... currently I do this
:
foreach my $item (@myarray) {
my ($item1, $item2) = @$item;
do stuff here
}
Is there a way to combine the first 2 lines? Is it any
To appease the powers that be, does anyone know if you can bind
columns to a hash:
i.e. $sth-bind_columns(undef,\$val{a},\$val{b},\$val{c}); # ?
All of which leaves me scritching my head as to why that would be
a case of 'dynamic variable declaration'
If I didn't ask a question
Now I've got an array of hashes, where each hash can have
different keys e.g.,
@aoh = ( {H3 =234, H1 =127, DNA =1, p135 =167},
{H4=24, H3=1550, DNA =25, p39 =67},
{H3 =34, H2A =125, DNA =5, p32 =7},
{H3 =24, H4 =156, DNA =123, p12 =13}
)
And
http://www.wetware.com/drieux/CS/lang/Perl/Beginners/BenchMarks/complexArrayHash_v_loop.
txt
for the details on the comparison
looks like the double loop is faster but it may not be
in some other configuration of data...
The dereference is probably wasting cycles, why
On Monday, May 6, 2002, at 09:07 , David Gray wrote:
Good Lord, you're gonna scare away the beginners who have questions
about perl!
my apologies - that was clearly not my intentions
Rather it was to re-assure those who are new to perl that
yes all the generalized rules about how one
On Mon, May 06, 2002 at 12:04:14PM -0400, Jason Frisvold wrote:
Here's another simple question I have an array of arrays and I want
to use a foreach to do something with each entry... currently I do this
:
foreach my $item (@myarray) {
my ($item1, $item2) = @$item;
do
Jason,
Play with the script below:
my @a1 = qw( one ace );
my @a2 = qw( two deuce );
my @a3 = qw( thr tri );
my @a4 = qw( fou quad );
my @a5 = qw( fiv quat );
my @myarray = (\@a1, \@a2, \@a3, \@a4, \@a5);
foreach my $item (@myarray) {
my($item1, $item2) = @$item;
print $item1 and
Yeah, I thought of doing it that way too However, my purpose was to
skip the unnecessary step and pump the data right into variables.
This way I drop the memory needed to go that extra step and I retain
readability of code...
I can live with it the way it is now, I guess... Just one of
On Mon, 2002-05-06 at 12:04, Jason Frisvold wrote:
Here's another simple question I have an array of arrays and I want
to use a foreach to do something with each entry... currently I do this
:
foreach my $item (@myarray) {
my ($item1, $item2) = @$item;
do stuff here
}
On Mon, May 06, 2002 at 12:22:15PM -0400, David Gray wrote:
Now I've got an array of hashes, where each hash can have
different keys e.g.,
@aoh = ( {H3 =234, H1 =127, DNA =1, p135 =167},
{H4=24, H3=1550, DNA =25, p39 =67},
{H3 =34, H2A =125, DNA =5, p32
Hello,
I installed perl module Text::Reflow on perl v5.6.1 for Solaris.
It built fine, but make test fails in that it hangs on the
first test.
cpan test Text::Reflow
Running test for module Text::Reflow
Running make for M/MW/MWARD/Text-Reflow-1.04.tar.gz
Is already unwrapped into
Setting this variable will be helpful, and will make the FS behave more
like a std unix one. It will support things like sticky bit, 000 perms,
etc etc by mapping NTFS acl stuff.
However, the cygwin files you have in your system, after setting this,
will be like rwxrwxrwx.
This is because when
--- Deb [EMAIL PROTECTED] wrote:
Hello,
Hiya!
I installed perl module Text::Reflow on perl v5.6.1 for Solaris.
It built fine, but make test fails in that it hangs on the
first test.
Okay, try again... does it still fail? If yes, then download the
module manually and follow the
Meanwhile, =?iso-8859-1?q?Jonathan=20E.=20Paton?= says:
|
| --- Deb [EMAIL PROTECTED] wrote:
| Hello,
|
| Hiya!
:-) Thanks for the swift reply.
| I installed perl module Text::Reflow on perl v5.6.1 for Solaris.
|
| It built fine, but make test fails in that it hangs on the
| first
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
Took me some time, but...
On Mon, May 06, 2002 at 04:41:03PM +0100, Richard Adams wrote:
Now I've got an array of hashes, where each hash can have different keys
e.g.,
@aoh = ( {H3 =234, H1 =127, DNA =1, p135 =167},
{H4=24, H3=1550, DNA =25, p39 =67},
{H3 =34,
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: [EMAIL
I would like to create a unique list.
Buy the Cookbook or search the archives, since this is a common
question. Basically one of the following two solutions is best.
%seen = ();
@unique = grep { not $seen{$_}++ } @list_A, @list_B;
OR:
%seen = ();
$seen{$_}++ for @list_A, @list_B;
@unique =
[Cross-posted reply to cross-posted article... to avoid]
[further duplication only '[EMAIL PROTECTED]' should ]
[be used for further correspondence on this thread.]
[Remove PBML from the header before replying! Jonathan]
Hi,
Please don't cross post questions between PBML and [EMAIL
On Mon, 2002-05-06 at 13:53, Lance Prais wrote:
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,
Use a Date:: module to make
On Monday, May 6, 2002, at 10:34 , Lance Prais wrote:
sub createUniquePartitionFile {
my %args = (
PARTITION = '',
PARTITIONFILE = '',
OUTPUTFILENAME = '',
@_,
);
$status = 0;
$partitionFile =
I am listing several variables...but I would like to make them all a certain
length to keep the format of the report somewhat...well formatted.
Is there an easy way to do this?
Right now I am just doing
prprint $ext_id\t$lastname,
perldoc -f printf
it's just like C's printf.
-Original Message-
From: Batchelor, Scott [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 06, 2002 3:14 PM
To: '[EMAIL PROTECTED]'
Subject: Doing a little formatting
I am listing several variables...but I would like to make
them all
Check out the format command.
perldoc -f format
perldoc perlform
-Original Message-
From: Batchelor, Scott [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 06, 2002 12:14 PM
To: '[EMAIL PROTECTED]'
Subject: Doing a little formatting
I am listing several variables...but I would like to
I'm in the midst of writing a PERL script that will display a calendar in
table form. I have a database (mySQL) with the events sorted by date. I'm
trying to write the calendar to place a hyperlink on those days that an
event is listed in the database.
So far I have no problem creating the
I am brand spanking new to Perl,
and Im working with Plain Blacks WebGUI
software. Im having difficulty
specifying the directories for some of my *.pm files. Is there a way to edit a @INC file of some
type (if such a thing exists) to include those directories? Thanks, everyone, for
Sorry for sending out that last message in HTML...plain text from now
on...
Seth Lilly
Help Desk Technician
West Virginia Higher Education Policy Commission
1018 Kanawha Blvd E Suite 700
Charleston WV 25301
304.558.2101
[EMAIL PROTECTED]
http://www.hepc.wvnet.edu
--
To unsubscribe, e-mail:
On Monday, May 6, 2002, at 10:34 , Lance Prais wrote:
Thank you in advance
http://www.wetware.com/drieux/CS/lang/Perl/Beginners/BenchMarks/FileWayuniqDeList.
txt
may help see the complications of doing this with File IO
I can understand the habit of 'directly porting' from /bin/sh
On Monday, May 6, 2002, at 12:45 , Seth Lilly wrote:
I am brand spanking new to Perl, and Im working with Plain Blacks
WebGUI software. Im having difficulty specifying the directories for
some of my *.pm files. Is there a way to edit a @INC file of some type
(if such a thing exists)
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= xxx;
add 'my' in front of these variables..
my @row;
my $oid;
Urmil
-Original Message-
From: Lance Prais [mailto:[EMAIL PROTECTED]]
Sent: Monday, May 06, 2002 3:15 PM
To: [EMAIL PROTECTED]
Subject: unfamiler errors
I am using the following code to extract data from a db and write to a
As an alternative, how about this... short sweet and lazy;)
BEGIN {
$current_dir = 'd:\\my_directory';
push(@INC, $current_dir);
}
print @INC\n;
-Original Message-
From: drieux
Sent: Mon 5/6/2002 4:07 PM
To: [EMAIL PROTECTED]
On Monday, May 6, 2002, at 01:15 , Lance Prais wrote:
[..]
while( @row = $sth-fetchrow_array )
{
$oid=$row[0];
print TEXTFILE$oid\n;
}
[..]
Error message:
Global symbol @row requires explicit package name at
Hi all, one more time I need some help. In the past I have used the
libwww-perl module to execute and get the information from that remote
web server. This was actually quite simple because I did not have to
post any data. Now I wrote an script that it will have to post some data
to the server
There are a few ways listed in the FAQ's. perldoc -q search word will
search the FAQ's on a specific word. Below is what was found when I
searched on the word library. Depending on your needs using the PERL5LIB
environment variable might be the best option (Just create a new environment
On Mon, May 06, 2002 at 11:40:10AM -0700, drieux wrote:
I'm very confused by the idea of
my %args = (
PARTITION = '',
PARTITIONFILE = '',
OUTPUTFILENAME = '',
@_,
);
why not the simpler
my ( $outputFile,
I am getting a connection error. I used this same connection string all
though out my scripts in this application without problems except in this
case. Does anyone know why I could be getting this error?
Connection String:
use DBI;
my $connect_string=DBI:Oracle:$SERVICE;
my $dbh =
Lance Prais wrote:
I am getting a connection error. I used this same connection string all
though out my scripts in this application without problems except in this
case. Does anyone know why I could be getting this error?
Connection String:
use DBI;
my
Hi All,
A question regarding process mgmt.
Using the system() call, you can call an os command a test for the return
value of the command in question, proceeding based on the return value.
However, using backquotes, is there a way to do the same? This method
returns the output of the program
On Monday, May 6, 2002, at 02:36 , Lance Prais wrote:
[..]
Does anyone know why I could be getting this error?
not sure - you might want to also re-read
http://search.cpan.org/doc/TIMB/DBI-1.21/DBI.pm
Connection String:
use DBI;
my $connect_string=DBI:Oracle:$SERVICE;
my $dbh =
One more issue:
When using this:
use DBI;
my $connect_string=DBI:Oracle:$SERVICE;
my $dbh = DBI-connect($connect_string,$oracle_user,$oracle_password,
{ AutoCommit= 0, LongTruncOk= 'TRUE', PrintError = 1,
ChopBlanks= 'TRUE',LongTruncOk= 'TRUE',LongReadLen= 5, RaiseError =
1 }) or
On Monday, May 6, 2002, at 03:09 , HENRY,MARK (HP-Roseville,ex1) wrote:
Hi All,
A question regarding process mgmt.
Using the system() call, you can call an os command a test for the return
value of the command in question, proceeding based on the return value.
However, using backquotes,
Answering myself here - found out it was the perl
binary. For some reason the binary compiled for 64-bit
execution would not make this module properly, but
the 32-bit does. Go figure.
Someone else is looking into why this might be the case.
For now, I'm happy to use the 32-bit version.
deb
On Monday, May 6, 2002, at 04:58 , Deb wrote:
Answering myself here - found out it was the perl
binary. For some reason the binary compiled for 64-bit
execution would not make this module properly, but
the 32-bit does. Go figure.
I presume that you are working in solaris 8 or higher?
Hi,
I'm just new to Perl and have no idea where to start with the task that I have to
complete. Any help would be appreciated.
Currently when a particular .exe is run, the following is displayed in the command
window -
License server on host kronos.
Running since Monday 4/04/96 15:53:13.
On Monday, May 6, 2002, at 10:04 , [EMAIL PROTECTED]
wrote:
ACTIVE users:
that's rather the key - its a reasonably clear line
or build up the regular expression from the next line
either way
cf: perldoc perlre
I presume you can do something in windows that is the equivolent
of a
I'm just new to Perl and have no idea where to start with the task that I have to
complete. Any help would be appreciated.
Currently when a particular .exe is run, the following is displayed in the command
window -
License server on host kronos.
Running since Monday 4/04/96 15:53:13.
1 - 100 of 101 matches
Mail list logo