On Monday, June 2, 2003, at 08:10 PM, Stuart White wrote:
Ok, I think I get it. the $_ is printing the player
name, (though I don't know why I'm not using $1
instead for that)
$1 contains the first capture of the last match we did. When you're
using match variables like that, store them somewh
[Mark: please post only plain text, and don't top-post. I've moved your
reply to the bottom]
Mark Martin wrote:
> - Original Message -
> From: "Bob Showalter" <[EMAIL PROTECTED]>
> To: "'Mark Martin'" <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
> Sent: Monday, June 02, 2003 2:14 PM
> Subject:
T.S. Ravi Shankar wrote:
> Hi all :
>
> I see these lines at the very beginning lines of a perl program.
> Could anyone explain what this is doing ??
>
> eval '(exit $?0)' && eval 'exec perl $PERL_OPTIONS $0 ${1+"$@"}'
> & eval 'exec perl $PERL_OPTIONS $0 $argv:q'
> if 0;
>
> In what wa
Vema, Venkata wrote:
> HI
> The following pl pgm executes when the process "srvtst26.pl "is
> stopped. It gets started automatically started thru crontab by
> command "ahdxapi.init" what i want now is i want to write to a log
> file with time when it gets started "ahdxapi.init"
> can any one help
use DBI;use DBD::Oracle;
is redundant
use DBI;
is sufficient.
José.
> -Original Message-
> From: Mark Martin [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, June 03, 2003 12:47 PM
> To: Bob Showalter; [EMAIL PROTECTED]
> Subject: Re: DBI and Unique Keys
>
>
> Bob,
> here is the code with SQ
Bob,
here is the code with SQL embedded. It's a very simple extract from one Dbase and
insert into another :
#!/usr/bin/perl
use CGI qw(fatalsToBrowser);
use DBI; use DBD::Oracle;
$dbh1 = DBI->connect( "dbi:Oracle:SOURCE_SID", "username", "pword" ) or die "Can't
connect to Oracle database: $DBI
From: WC -Sx- Jones <[EMAIL PROTECTED]>
> Hey!
>
> Has anyone heard from (or about) TCHRIST ?
You mean Tom Christiansen?
http://search.cpan.org/author/TOMC/
> Is he alive and well?
I hope so.
Jenda
= [EMAIL PROTECTED] === http://Jenda.Krynicky.cz =
When it comes to wine, women and song
Ying Liu wrote at Fri, 30 May 2003 10:48:06 -0500:
> When I install Heap module, I don't have the superuser permission and set
> the install location by run:
> %perl Makefile.PL PREFIX=/mz/hd/liuyi/local/Heap-0.50
> %make
> %make test
>
> The above three commands run OK, but after I run '%make in
sorry for my crappy english :-)
i'm tired, normally it's better but after 2 nights with less than 4 hours of sleep
i cannot really write logical sentences anymore ;-)
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
John W. Krahn wrote at Mon, 02 Jun 2003 14:44:41 -0700:
> You should probably use an array to keep the correct order and a hash to
> keep the count:
Or to use Tie::IxHash.
Greetings,
Janek
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
I'm always an very curious guy and i just because of that i made a little
script that analyises my scripts, extracts the subs, counts lines,
mys, uses, subs, etc... maybe some of you are as courious as i am
but too lazy to do that for yourself, so i want to share it with the
perl community.
totall
> > Testing with mutliple unknown factors in the mix
> causes an exponential increase in the difficulty of
> debugging.
Pretty much done all that...
> Amen to that one. That's what I was tryign to get
> him to do was narrow down and rule out different
> things.
> Like, if he's trying to get a ur
In article <[EMAIL PROTECTED]>, Stuart
White wrote:
> This does make it clearer, but not entirely. Is this
> James wrote:
>> This is a common Perl technique, often used with a
>> hash named '%seen'
>> because that's exactly what it's keeping track of.
>> $1 is where you
>> were capturing your n
I have been using RPM::Database so long but that does not get installed
on redhat 9.0 ( Gives weird make errors )
Is there an alternative module that I can use.
I need to query the existing rpm db and create a hash of all installed
modules vs their version-release
like
%rpms = (
'at
Hi all :
I see these lines at the very beginning lines of a perl program. Could
anyone explain what this is doing ??
eval '(exit $?0)' && eval 'exec perl $PERL_OPTIONS $0 ${1+"$@"}'
& eval 'exec perl $PERL_OPTIONS $0 $argv:q'
if 0;
In what way "eval" help here in traping the errors ??
Hey!
Has anyone heard from (or about) TCHRIST ?
Is he alive and well?
???/Sx ?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
This does make it clearer, but not entirely. Is this
what is happening: the loop starts, and goes
immediately into the if statement. when the regex
finds a line with "Jump Shot" it stores that in $2,
and the player name in $1. The next thing it does,
and I'm not quite sure how, is it populates a
Ok, I think I get it. the $_ is printing the player
name, (though I don't know why I'm not using $1
instead for that) and the $linehash{$_} means, in
English, "the value of the key stored in $_" is that
right?
Thanks for all your help.
--- James Edward Gray II <[EMAIL PROTECTED]>
wrote:
> Print
HI
The following pl pgm executes when the process "srvtst26.pl "is stopped.
It gets started automatically started thru crontab by command "ahdxapi.init"
what i want now is i want to write to a log file with time when it gets started
"ahdxapi.init"
can any one help me on this
apprecitated ur
Print it like this, it's easier:
print "$_ : $linehash{$_}\n" foreach (sort keys %linehash);
James
On Monday, June 2, 2003, at 07:03 PM, Stuart White wrote:
One more thing, if I want to sort the hash
alphabetically by key where do I put the sort
function?
I tried it before the while loop that
On Monday, June 2, 2003, at 06:54 PM, Stuart White wrote:
I don't understand this syntax:
$linehash{$1}++;
Could you explain it to me?
Absolutely.
This is a common Perl technique, often used with a hash named '%seen'
because that's exactly what it's keeping track of. $1 is where you
were ca
One more thing, if I want to sort the hash
alphabetically by key where do I put the sort
function?
I tried it before the while loop that does the
printing and on the each function
(sort(each(%linehash))) and that just gave me numbers
first, colon, player names. and I figure that it
wouldn't work
HI
The following pl pgm executes when the process "srvtst26.pl "is stopped.
It gets started automatically started thru crontab by command "ahdxapi.init"
what i want now is i want to write to a log file with time when it gets started
"ahdxapi.init"
can any one help me on this
apprecitated ur ear
Hey, thanks that worked!
--- James Edward Gray II <[EMAIL PROTECTED]>
wrote:
> I don't seen any reason to use the array at all, so
> I've removed it.
> If you had one that I just didn't know about, send
> it on back.
That's how I tried to solve this piecewise, I thought
an array was necessary,
Hey, thanks that worked!
--- James Edward Gray II <[EMAIL PROTECTED]>
wrote:
> I don't seen any reason to use the array at all, so
> I've removed it.
> If you had one that I just didn't know about, send
> it on back.
That's how I tried to solve this piecewise, I thought
an array was necessary,
HI
The following pl pgm executes when the process "srvtst26.pl "is stopped.
It gets started automatically started thru crontab by command "ahdxapi.init"
what i want now is i want to write to a log file with time when it gets started
"ahdxapi.init"
can any one help me on this
apprecitated ur ear
On Monday, June 2, 2003, at 05:12 PM, Stuart White wrote:
Hmm, this might actually be more productive I showed
less abstract example lines.
Not sure I understand perfectly yet, but I'll give it another go.
I don't seen any reason to use the array at all, so I've removed it.
If you had one that
> You should probably use an array to keep the correct
> order and a hash to
> keep the count:
>
I don't really understand what you mean.
__
Do you Yahoo!?
Yahoo! Calendar - Free online calendar with sync to Outlook(TM).
http://calendar.yahoo.com
--
To unsubscr
Hmm, I'm not sure, but I don't want to keep rewriting
my hash.
--- [EMAIL PROTECTED] wrote:
> Shouldn't you only set the values of the array once
> you have gone through
> the entire file? Otherwise You keep rewriting your
> hash.
>
> %linehash = @line;
>
>
>
> "The right word may be effective
Shouldn't you only set the values of the array once you have gone through
the entire file? Otherwise You keep rewriting your hash.
%linehash = @line;
"The right word may be effective, but no word was ever as effective as a
rightly timed pause."
--Mark Twai
Hmm, this might actually be more productive I showed
less abstract example lines. (I couldn't do this
before as I didn't have the code in front of me.)
Here is an example of the lines that my code is
selecting and then extracting a player name and jump
shot attempt(working on this part) then putti
Thank you for the information. I'm looking forward to trying out this new
find!
Ms. Jackie
:-)
> -Original Message-
> From: De Joe, Jackie
> Sent: Thursday, May 29, 2003 6:31 PM
> To: [EMAIL PROTECTED]
> Subject: Can I compile perl so I can run a perl script without hav
Stuart White wrote:
>
> I am reading in a file of one line sentences, and then
> selecting to store several sentences into an array
> based upon the presence of some key words. I then
> want to assign the array to a hash. The output of the
> array will look something like this:
>
> Player1: 1
>
On Monday, June 2, 2003, at 04:02 PM, Stuart White wrote:
Also, to get the numbers to the right of the colon,
I'd have to have a count for each occurrence of each
player, how might I do that?
Perhaps with something like:
my %hash;
$hash{ (split /:/, $_)[0] }++ foreach (@array);
That just walks t
I am reading in a file of one line sentences, and then
selecting to store several sentences into an array
based upon the presence of some key words. I then
want to assign the array to a hash. The output of the
array will look something like this:
Player1: 1
Player2: 1
Player3: 1
Player1: 2
Playe
On Mon, Jun 02, 2003 at 11:55:54AM -0700, Gupta, Sharad wrote:
> Hi All,
>
> I was looking for a pointer on the web to understand them, something like a tutorial.
> Any help is appreciated.
Unless it is for purely academic interest, just forget you ever heard
about them. They were always experi
I'll leave it to others to point out a good tutorial, since the ones I
can name are in books. However, just FYI, this is a quote from the
changes document of Perl 5.8.0:
The current user-visible implementation of pseudo-
hashes (the weird use of the first array element) is
deprecated starting f
Through much digging I found AddScrollbars was defined in Tk::Frame..
#!perl -w
# Pchopler.pl
use strict;
use Tk 800.000;
# These are all the modules that we are using in this script.
use Tk::Frame;
use Tk::TextUndo;
use Tk::Text;
use Tk::Scrollbar;
use Tk::Menu;
use Tk::Menubutton;
use Tk::Adjust
Hi All,
I was looking for a pointer on the web to understand them, something like a tutorial.
Any help is appreciated.
Thanx,
-Sharad
> > The problem is one of my strings is "00". It gets written out fine, but
gets
> > read in as "0". How can I stop this from happening?
> >
>
> Perl has no problem reading a string like this. Are you sure you don't add
> it with 0 or do something else numeric in between? It works for me.
Ah, you
On Mon, 2 Jun 2003, Sockmonkey wrote:
> My program writes string to a text file and reads them back in. I do it like
> this:
>
> print OUT "$str\n";
>
> and then
>
> $str = ;
> chomp($str);
>
> The problem is one of my strings is "00". It gets written out fine, but gets
> read in as "0". How can I
My program writes string to a text file and reads them back in. I do it like
this:
print OUT "$str\n";
and then
$str = ;
chomp($str);
The problem is one of my strings is "00". It gets written out fine, but gets
read in as "0". How can I stop this from happening?
Thx
--
To unsubscribe, e-ma
In a message dated 6/2/03 10:10:40 AM Pacific Daylight Time,
[EMAIL PROTECTED] writes:
> -T
> Thanks, I will put this post in my notes
From: [EMAIL PROTECTED]
> Also I'm using -t switch and it doesn't throw an error on my win98 box
> but on the Unix server it does. And when I check the error file it
> doesn't record the error.
-t Like -T, but taint checks will issue warnings rather than
fatal
e
I use a BEGIN{open(STDERR, "./error.txt"} in my script to track errors and trace variables etc. But I think a friend has pointed the error out to me. I'm checking now.
--- Begin Message ---
I use a BEGIN{open(STDERR, "./error.txt"} in my script to track errors and trace variables etc. But I think
[EMAIL PROTECTED] wrote:
> ...
> Also I'm using -t switch and it doesn't throw an error on my win98
> box but on the Unix server it does. And when I check the error file
> it doesn't record the error.
What's the error message? Did you read perldoc perlsec?
--
To unsubscribe, e-mail: [EMAIL PROT
> I am new to marketing. I know how to sell on ebay and that's about
> it. I
> don't know how to protect myself with legal jargon. Can anyone point
> me in the
> right direction?
Hire a lawyer? Google.com search for gnu license
>
> I've written a script that installs a Flash file on the users
What does the first paragraph have to do with the rest of them?
On Monday, June 2, 2003, at 12:00 PM, [EMAIL PROTECTED] wrote:
I am new to marketing. I know how to sell on ebay and that's about
it. I
don't know how to protect myself with legal jargon. Can anyone point
me in the
right direct
Rob Dixon wrote:
> Tassilo Von Parseval wrote:
> > On Mon, Jun 02, 2003 at 07:53:06AM -0400 zentara wrote:
> >
> > > This one is puzzling me.
> > > I know it's in the faq, to not use variables for variable
> > > naming, but I find it odd that I can't get a "stringified" form
> > > of a variable nam
I am new to marketing. I know how to sell on ebay and that's about it. I
don't know how to protect myself with legal jargon. Can anyone point me in the
right direction?
I've written a script that installs a Flash file on the users server using
LWP and gathers info for the text files that the
Tassilo Von Parseval wrote:
> On Mon, Jun 02, 2003 at 07:53:06AM -0400 zentara wrote:
>
> > This one is puzzling me.
> > I know it's in the faq, to not use variables for variable naming,
> > but I find it odd that I can't get a "stringified" form of a
> > variable name, maybe from the symbol table?
Greetings
I had to reinstall perl5 when I had problems with the version bundled
with RedHat 9.0. I made a bone-head mistake with directory
specifications, and now any perl module install will try to put man
pages in /usr/bin/man (which is the executable for man, not a
directory). Can someone point
None that I can remember, but I am open to making necessary changes..
>>> "Paul Kraus" <[EMAIL PROTECTED]> 06/02/03 11:45AM >>>
No changes to the system? Perl upgrade? System reload? Anything at all
that you can remember?
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED
> Thank you, What i meant is that
> If i search in a table all people that speaks English.
> I want mysql to search for the first 10 people that matche the query, then have an
> option next to go from the last person > to the next 10 people. Or something better
> would be SELECT FROM tablex START
> much more user-friendly IIS instead of Apache.
User friendly? IIS? You mean the one Microsoft does? Boo to that IIS sucks, and is a
costly sucker to run.
Ok enough ranting, no flames intended ;p
> Testing with mutliple unknown factors in the mix causes an exponential increase in
> the diffi
> The following script works for all
> pages store locally, and it works for out internet IP
> (if I type in our companies IP address I get their homepage...but I can't go further
> afield)
Can you get anythign returned if you get('216.239.51.100')?
Is that "company ip address" a public IP addre
No changes to the system? Perl upgrade? System reload? Anything at all
that you can remember?
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Monday, June 02, 2003 9:39 AM
To: [EMAIL PROTECTED]
Subject: Error
Can't locate Tk/AddScrollbars.pm in @INC (@INC cont
Hi,
Thank you, What i meant is that
If i search in a table all people that speaks English.
I want mysql to search for the first 10 people that matche the query, then
have an option next to go from the last person to the next 10 people.
Or something better would be
SELECT FROM tablex START FROM PER
Can't locate Tk/AddScrollbars.pm in @INC (@INC contains: C:/Perl/lib
C:/Perl/site/lib .) at C:/Perl/lib/Tk/Widget.pm line 261.
I was using this perl script without problems, then all of the sudden I am
getting this error... I googled it and go nowhere.. any ideas? I tried to
re-install TK from
> Hi,
Howdy,
> I would like to know if it is possible with perl, when we search for a general
> 'thing'( i.e search in the database all
> people that speaks english) in a MySQL database, what is the row number of the last
> row that matches the SELECT statment?
> If so can someone show me an
60 matches
Mail list logo
