Dumping values of all vars

2004-01-14 Thread jdavis
Hello, Is it possible to dump the values of all the vars in a perl script easily? I want to have a sub called Error that when called will tell me the current value of all the vars in the script. thanks, -- jdavis <[EMAIL PROTECTED]> -- To unsubscribe, e-mail: [EMAIL PROTECTE

Re: redirect with cgi.pm

2004-01-14 Thread jdavis
On Wed, 2004-01-14 at 10:19, James Edward Gray II wrote: > On Jan 14, 2004, at 11:07 AM, jdavis wrote: > > > Thanks all who replied. From your post i gather that i need > > to handle my redirect client sideso. > > > > #!/usr/bin/perl > > use

RE: redirect with cgi.pm

2004-01-14 Thread jdavis
7;s more likely to cause a browser to choke, > which would kind of defeat the purpose that's all. And that's not just > true with Perl it's the http protocol and a browser's use of it. > > > Best, > > > > Jan > > -- > > There are 10 kin

redirect with cgi.pm

2004-01-13 Thread jdavis
then do a redirect when its done. is this possible? thanks, -- jdavis <[EMAIL PROTECTED]> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>

Re: hash problems

2003-12-13 Thread jdavis
On Fri, 2003-12-12 at 23:58, John W. Krahn wrote: > Jdavis wrote: > > > > Hello, > > Hello, > > > I have a script that gets items and corresponding price from a web > > site. all goes well until i put the item and price in a hash. When i try > > to

hash problems

2003-12-12 Thread jdavis
Hello, I have a script that gets items and corresponding price from a web site. all goes well until i put the item and price in a hash. When i try to print key and value from the hash it comes out all weired. Could some one take a look and see what im doing wrong. thanks, -- jdavis <[EM

RE: meta refresh - PERL - IE

2003-07-23 Thread jdavis
back... Thanks for the help, jd On Wed, 2003-07-23 at 08:31, Charles K. Clarkson wrote: > jdavis <[EMAIL PROTECTED]> wrote: > : > : The code below is from a cgi scrip > : this code makes a html page by calling &FP > > What is in FP()? > > : this wo

Re: Create Perl Menu

2003-07-23 Thread jdavis
= `date`; $who = `w`; $pwd = `pwd`; $ls = `ls`; $xmess = '/usr/bin/X11/xmessage'; open(GUI, "|$xmess -file -") || die "no"; print GUI "Date: $date\n"; print GUI "Users: $who\n"; print GUI &qu

meta refresh - PERL - IE

2003-07-22 Thread jdavis
print "One Moment Thinking..\n"; } thanks, -- jdavis <[EMAIL PROTECTED]> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

passing a var to a sub

2003-07-22 Thread jdavis
hello, I would like to pass subs vars to work on. right now I,m using globals to pass messages to the subs.Is this the right way to do this? thanks, -- jdavis <[EMAIL PROTECTED]> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: silly question

2003-07-09 Thread jdavis
e question. > what is socket programming? what do sockets do? is there a site > that can explain them to me? thanks > > john > > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] -- jdavis <[EMAIL PROTECTED]> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Low Level Socket Programming

2003-07-08 Thread jdavis
, -- jdavis <[EMAIL PROTECTED]> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

$! and $@

2003-07-08 Thread jdavis
Hello, I think these catch errors somehow... $! and $@ could someone explain this. thanks, -- jdavis <[EMAIL PROTECTED]> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

use Pg;

2003-04-01 Thread jdavis
Hello, I created 25 postgres databases by hand. Each with one small table. All the databases are named like so... MY_DATA_0 MT_DATA_1 etc.. When i use this code use Pg; $conn = Pg::connectdb("dbname=MY_DATA_0"); if ($conn->status != PGRES_CONNECTION_OK){ $errorMessage = $conn->error

Re: dumb array/hash question

2003-04-01 Thread jdavis
@? but it works :) thanks, jd On Tue, 2003-04-01 at 03:19, Aim wrote: > Hi, > > Here is one way to build a hash: > > my %data = ( > "12am" => "251", > "1am" => "102" ); > etc. > > Regards. > >

RE: Simple split question

2003-04-01 Thread jdavis
yone is intrested I will post here when its done. Also i figure I can use the logging in iptables, maybe with snmp, to make netflows that are aware of state, ports, and ips. jd [EMAIL PROTECTED] On Mon, 2003-03-31 at 22:38, Scott R. Godin wrote: > Jdavis wrote: > > >> > >

dumb array/hash question

2003-03-31 Thread jdavis
hello, I have a hash. To use this hash with a module I need it in this form... @data = ( ["12am","1am","2am","3am","4am","5am","6am", "7am", "8am"], ### key [ 251, 102, 55, 36, 113, 200,32,99, 4], ###val ); I confused.. How could I get a hash to the above structure

RE: Simple split question

2003-03-31 Thread jdavis
I found the error. Sorry to answer my own queston I was trying (@bad,@good) = split(/ /, $string); when i needed ($bad,$good) = split(/ /, $string); thanks for all the help. jd On Mon, 2003-03-31 at 16:18, jdavis wrote: > > > > ($left,$right) = split(/word/, $sentence); &g

RE: Simple split question

2003-03-31 Thread jdavis
> > ($left,$right) = split(/word/, $sentence); > I am trying this but its not working. Im lost :) could someone take a look... This is the beggining of a scrip to make reports based on droped iptable packets thanks jd # #!/usr/bin/perl -w $fi

Simple split question

2003-03-31 Thread jdavis
Hello, I have a sentince I would like to split on a word and keep everything right of the "split word". I cant seem to get this to work. Could over me some advice. Thanks, -- jd [EMAIL PROTECTED] Bad spellers of the world untie! "I can't tell if I have worked all my life or if I have never w

make a graph

2003-03-31 Thread jdavis
Hello, I would like to make a bar graph, in a png or jpg format. Could someone suggest a good perl moduel to help me. Thanks, -- jd [EMAIL PROTECTED] Bad spellers of the world untie! "I can't tell if I have worked all my life or if I have never worked a single day of my life"

Re: cgi post and get ??

2003-03-30 Thread jdavis
On Sun, 2003-03-30 at 01:47, Rob Dixon wrote: > Jdavis wrote: > > hello, > > > > I have a perl/cgi scrip that Im trying to link to and pass a var like > > so.. > > > > > > > > the page im linking from has a that gets filled in by a user. &g

cgi post and get ??

2003-03-29 Thread jdavis
hello, I have a perl/cgi scrip that Im trying to link to and pass a var like so.. the page im linking from has a that gets filled in by a user. Prima Gallery, the s name is 'content'. SO the_prima.cgi scrip has a if loop to determine the instance to use. In this case Im calling instance

Re: Script does not want to run, error

2003-03-05 Thread jdavis
On Wed, 2003-03-05 at 15:11, mel awaisi wrote: > Hi, > > I am having problems opening this script on my machine. i have been getting > help from a very helpful person on this list. > > I have checked the shebang line, that perl exists, and perl -v gives proper > output. > > i try to run the sc

truth test on a hash

2003-03-05 Thread jdavis
hello, I am trying to test a key from a hash in a hash the script gives me the desired result overall but i get the warning ... Use of uninitalized value in pattern match (m//) at ./passwd.pl line 26. could someone tell me why i get this error here is the code (this scrip looks at /etc/passwd and

regex fun :)

2003-03-05 Thread jdavis
hello, while trying to get a grasp on regex i found this nice little tutorial. http://www.steve.gb.com/perl/lesson06.html so i tried this.. $choice = 11 if($choice =~ /[1-6]{1}/) this returns true. I want it to only match a single digit ranging 1-6 , I thought the {1} would specifiy to match o

Re: perl program control -- wvdial

2003-03-05 Thread jdavis
On Wed, 2003-03-05 at 07:19, zentara wrote: > On 04 Mar 2003 22:58:20 -0700, [EMAIL PROTECTED] (Jdavis) wrote: > > >Hello, > > I am writing a script to help a user turn a modem > >on and off and adjust the routing tables on a > >Linux box. I am trying to call wvdia

perl program control -- wvdial

2003-03-04 Thread jdavis
Hello, I am writing a script to help a user turn a modem on and off and adjust the routing tables on a Linux box. I am trying to call wvdial to do the dialing, but it does not give control back to my script. I call it like so if( $choice == 1){ `wvdial`; print "connected"; } I

RE: bitwise?

2003-02-23 Thread jdavis
On Sun, 2003-02-23 at 03:41, Beau E. Cox wrote: > Hi - > > > -Original Message- > > From: jdavis [mailto:[EMAIL PROTECTED] > > Sent: Saturday, February 22, 2003 11:52 PM > > To: perl > > Subject: bitwise? > > > > > > Hello, > &

bitwise?

2003-02-23 Thread jdavis
Hello, Could someone explain what bitwise means? I am reading up on Perl operators and I am seeing the term bitwise used for the & and | operators. better yet could i get a little code with a example of bitwise operators that a newbie could assimilate. Thanks, -- jd [EMAIL PROTECTED] Bad spell

Re: Perl/TK Tutor

2003-02-14 Thread jdavis
On Thu, 2003-02-13 at 10:38, yargo wrote: > Where can I get a good TK tutorial, in order to learn the TK basics ? > > TIA, > YG http://www.perl.com/1999/10/perltk/ -- jd [EMAIL PROTECTED] Bad spellers of the world untie! -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands

cross platform gui

2003-02-12 Thread jdavis
Hello, I would like to write a GUI enabled scrip that will run on Linux,MAC OSX, And Windows. I read that perl/tk does not work for Macs but Im hoping this does not apply to OSX. Could someone confirm this, or just offer suggestions on how I might GUI enable perl on mac,win,and Linux. Thanks Alo

Re: still needing help

2003-01-30 Thread jdavis
...maybe you could tell him why you think this form parser is broken and actully really help someone...ok so maybe stop being so freakin cool for just a sec and try to help On Thu, 2003-01-30 at 05:19, Todd W wrote: > "Jdavis" <[EMAIL PROTECTED]> wrote in message > [EMAIL P

system call

2003-01-29 Thread jdavis
hello, Could someont tell me the secure way to get input from a system call like... $date = `/bin/date`; or $client = `/usr/bin/finsmb`; TIA, -- jd [EMAIL PROTECTED] Bad spellers of the world untie! -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PRO

Re: still needing help

2003-01-29 Thread jdavis
i have not been following this thread...but it appears as if you just want a generic cgi scrip to work...I like to use &ReadParse for most of my easy cgi interactions ...heer is a example.. if you had a form varable like so you could use ReadParse like this... #!/usr/bin/perl &ReadParse;

Re: changing backgorund color error

2003-01-25 Thread jdavis
On Sat, 2003-01-25 at 00:25, MJ wrote: > The below given part of code from a cgi script is > working fine but when I try to change the back ground > color to > print "\n"; print "\n"; looks like you need to maybe this will help..you have that qoute at the end..by the 2 print "\n"; -- jd [E

Re: Email function question

2003-01-24 Thread jdavis
On Fri, 2003-01-24 at 14:20, jdavis wrote: > On Fri, 2003-01-24 at 15:35, Scott, Deborah wrote: > > I asked this before, but I probably made the question too long and confusing > > to follow. > > > > How do I send an email using perl? > > The path for the sen

Re: Email function question

2003-01-24 Thread jdavis
On Fri, 2003-01-24 at 15:35, Scott, Deborah wrote: > I asked this before, but I probably made the question too long and confusing > to follow. > > How do I send an email using perl? > The path for the sendmail program is: > h:/blah/blah/SENDMAIL/sendmail.exe > > I want it to open the conte