Re: internal server error

2003-03-17 Thread R. Joseph Newton
Rob Dixon wrote: > Robbie Staufer wrote: > > Hi, > > > > I have a partial perl script for a mock-up web page, that will collect > > information from users as part of a registration form. In trying to > > see what it looks like so far on the web, I'm getting an internal > > server error. I though

Re: help with whois code

2003-03-17 Thread R. Joseph Newton
"Brett W. McCoy" wrote: > The trouble with you > Is the trouble with me. > Got two good eyes > But we still don't see. > -- Robert Hunter, "Workingman's Dead" [OT] Actually, that was "Casey Jones". The verse goes on: Come 'round the bend You--ya' know it's the end The ... firema

Re: help with whois code

2003-03-17 Thread R. Joseph Newton
Tony Esposito wrote: > BTW - Anyone know where to get the Carp module for Perl 5.6.1 on Win32 ( > WindowsNT ) and how to install it? I am using the OpenPerl IDE and it > complains about not being able to locate Carp. I checked and it is not on > my Win32 system. > Thanks! Thje module itself can

Re: Help with script , error 500

2003-03-17 Thread R. Joseph Newton
Ramón Chávez wrote: > Hello everyone. Hi Ramon, I think I see your problem right here: >print "content-type: text/html \n\n"; Should be: print "Content-type: text/html\n\n"; I can't say that that is the only problem, but that probably would be enough to hang the process. Try changing th

Re: Fun with Regexes

2003-03-17 Thread R. Joseph Newton
Pete Emerson wrote: > Mar 16, 2003 at 5:08pm from Rob Dixon: > > RD> (print 'abc') + ($success = 0) + (last); > > Rob, thanks, this example helps drive the point home. Would you also argue > that > > open INFILE, $file || die "Can't open $file: $!"; > > should really be written as > > die

Re: arrays and subroutines

2003-03-17 Thread R. Joseph Newton
David Newman wrote: > Greetings. I have a newbie question about passing arrays into a subroutine > (and getting return values as well). Hi David, I can't help much as far as passing or returning whole arrays, but there is a much better way to access arrays from inside a function. I'll show you

Re: why does sysopen fails to create a file?

2003-03-14 Thread R. Joseph Newton
Erwin Zavala wrote: > It is failing at line 5 .. and the error message is: Joseph -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Slightly OT

2003-03-14 Thread R. Joseph Newton
David Olbersen wrote: > I'm writing a script that will be (among other things) decoding email attachments > using MIME::Decoder. > > I plan on limiting the maximum attachment size to some limit. > > Does anybody know where I can find the size differences between the encoded and > decoded file? >

Re: Help with Threads.

2003-03-14 Thread R. Joseph Newton
Sharmarke Aden wrote: Hi Sharmarke, > I'm new to Perl and trying to access several directories at the same time > and simply read the content of the directory and do some processing on the > files in those directories. The code below is a reference code to get > started on the real work. The cod

Re: apache error

2003-03-14 Thread R. Joseph Newton
Francesco del Vecchio wrote: > I'm new to apache and linux. > > I'm trying to run the "Hello World" cgi that works perfectly from terminal but via > WebServer I > obtain this error: > > [Fri Mar 14 17:03:11 2003] [error] [client 127.0.0.1] Premature end of script > headers: hello.pl > > Do you h

Re: apache error

2003-03-14 Thread R. Joseph Newton
Bob Showalter wrote: > R. Joseph Newton wrote: > > What system needs those "\r"s? I have yet to run across a > > web browser thaqt did not respond properly with simple newlines: "\n". > > They are required per RFC2616, and they are output by CGI.p

Re: How to map hash keys only, not values?

2003-03-14 Thread R. Joseph Newton
[EMAIL PROTECTED] wrote: > Hi Joseph, > > >Probably just as well. Is there some context where you anticipate having > to repair broken keys after the fact? > > In this case I'm building packages, and don't want to count on the user to > get the case of the text correct when passing the values. L

Re: apache error

2003-03-14 Thread R. Joseph Newton
Francesco del Vecchio wrote: > Sorry for boring you, but even copying and pasting the source you gave me I obtain > the same error > :-(( > > Any help? > > Francesco Get rid of the "\r"s. Dont try to do too many things at once. Just print the header fist, on one line. That is one job. Then be

Re: apache error

2003-03-14 Thread R. Joseph Newton
Bob Showalter wrote: > A CGI script needs to output a MIME header. At a bare minimum, you need to > add the following: > >print "Content-Type: text/plain\r\n\r\n", >"ciao\n"; Hi Bob, What system needs those "\r"s? I have yet to run across a web browser thaqt did not respond properl

Re: problems extracting a range of lines, reworked

2003-03-14 Thread R. Joseph Newton
Pam Derks wrote: > the program ran as expected > but I did get this error: > Use of uninitialized value at instr_guts.pl line 39, chunk 2. > > here's line 39: > 39if($replace =~ $1){ > .. > here's the sample output: > YES: C. J. S. WALLIA > 1: Instructor: C. J. S. WALLIA > > 2: C. J

Re: Regular Expressions http error code

2003-03-13 Thread R. Joseph Newton
"R. Joseph Newton" wrote: ... an integer, followed by a *backslash*. # HTTP\d+\/ > There will be something on the other side of the *backslash*, to identify > subversion. Let's not count baskslash? Did somebody say "backslash"? Huh? I didn't hear

Re: problems extracting a range of lines, reworked

2003-03-13 Thread R. Joseph Newton
Pam Derks wrote: > thanks for help, here's my solution, any further comments are welcomed... > > thanks, Pam Hi Pam, What are the results from your test run? I foresee trouble beyond the first replaced instrucor name. Let me know if I am off base here. Joseph > #!/usr/bin/perl -w > use stri

Re: Regular Expressions http error code

2003-03-13 Thread R. Joseph Newton
"Romeyn, Derek" wrote: So I went ahead and modified it to print the code and the dataline and got Hi Derek, Take some time here to look at the string, and think about how you know which part is the error code. Is it just because you find a space after "HTTP"? It seems to me that there are some

Re: (Is this normal) www.techieindex.com

2003-03-13 Thread R. Joseph Newton
Voodoo Raja wrote: > hey Gues what there is no perl on www.techieindex.com > > and If it does then I guess there should be a survey for that site.. asap. > > coz i was just not able to locate perl stuff on that site. > > expecting a reply > > thanx > Sam > Hi Sam, If you have some issue about t

Re: Appending to a string

2003-03-13 Thread R. Joseph Newton
deb wrote: > Hi, > > I am modifying a file and replacing a string that I find, which works just > fine. However, sometimes there is already a string there that I don't want to > replace, but instead append something to it. > > Here's what I've got so far: (obligatory use statements not included h

Re: How to map hash keys only, not values?

2003-03-13 Thread R. Joseph Newton
[EMAIL PROTECTED] wrote: > >Replace > > > > EVIL: map { some;block;of;code;that;changes;$_ } @some_array; > > > >with > > > > GOOD: for (@some_array) { some;block;of;code;that;changes;$_ } > > I guess I don't get it. Map returns a value and I ignore it; so what? > What side effects does this ha

Re: Counting the number of times a string matches in another string

2003-03-13 Thread R. Joseph Newton
Rob Dixon wrote: > my $key = ':L000:W000:M260:B271:8:A:'; > my $regex = join '|', ($candidate =~ m/\w+/g); Slick! I like it. It's not my style exactly [I'd at least throw a comment in: "Set up or for regex"], but it definitely caught my fancy.<| :-o ) Joseph -- To unsubscribe, e-

Re: How to map hash keys only, not values?

2003-03-13 Thread R. Joseph Newton
[EMAIL PROTECTED] wrote: > Hi All, > > I'm passing a hash to a subroutine like this: > subname("a" => 123, "b" =>"fff", "C" => "joyjoyjoy"); Hi Peter, You probably sholdn't be doing this. Keys, whether in a hash or a database table, are primary references. They should not be modified af

Re: How to map hash keys only, not values?

2003-03-13 Thread R. Joseph Newton
[EMAIL PROTECTED] wrote: > >First, please don't use map in a void context for its side effects. > > Uh oh... What side effects? I use map like this all the time! What dread > is looming in my future? Do: perldoc -f map and read carefully the second paragraph of discussion: Note that

Re: I Wanna Get Weighed

2003-03-13 Thread R. Joseph Newton
"Mr. Horace Franklin Jr." wrote: > To All, > > Recently, a member/user of [EMAIL PROTECTED] brought > to my attention that I had addressed a joke email, I Wanna > get Weighed, to [EMAIL PROTECTED] This email was sent > was sent by accident. It was a mistake. > > Nevertheless, I owe each and eve

Re: problems extracting a range of lines

2003-03-13 Thread R. Joseph Newton
Pam Derks wrote: > Hi all, Hi Pam, I think you may be making it harder than it needs to be. I will add some inline comments . > In FILE1 I want to replace all the lines containing: > Instructor: [A-Z].+ You are jumping far too quickly into code here. This should be in english. Are you ac

Re: COunting the number of times a string matches in another string

2003-03-12 Thread R. Joseph Newton
Paul Johnson wrote: > On Wed, Mar 12, 2003 at 03:09:36PM -0800, R. Joseph Newton wrote: > > Mark Anderson wrote: > > > > > > It sounds like you need a count hash. You might try something like: > > > > > > > > my @tokens = split /:/; >

Re: ActivePerl 5-6-1 build 633

2003-03-12 Thread R. Joseph Newton
"Mr. Horace Franklin Jr." wrote: > Most Excellent ones, I have installed ActivePerl 5-6-1 build 633 on my PC(WIN).Can I > use this program on my stand alone PC to test the syntaxof perl CGI scripts? If the > answer is yes. Are there any tips for configuring perl? Novice Yes. The specifics on

Re: COunting the number of times a string matches in another string

2003-03-12 Thread R. Joseph Newton
[EMAIL PROTECTED] wrote: > Thanks, Rob and Mark, but I'm pretty sure I'm trying to do something a > little different from a count hash. Each token in the candidate string > needs to be compared separately to all the target strings, and then count > the number of matches. So take any token out of

Re: COunting the number of times a string matches in another string

2003-03-12 Thread R. Joseph Newton
Mark Anderson wrote: > > It sounds like you need a count hash. You might try something like: > > > > my @tokens = split /:/; > > foreach (@tokens) { > >if ($tokenCount{$_}) { > > $tokenCount{$_}++; > >} else { > > $tokenCount{$_} = 1; > >} > > } > > The following works th

Re: COunting the number of times a string matches in another string

2003-03-12 Thread R. Joseph Newton
[EMAIL PROTECTED] wrote: > Hi! Maybe this is really easy, but hey, I'm a beginner with Perl. > > I'm trying to count the number of times a string is contained inside > another string. Here's a sample of my data, a set of colon-delimited > values from the Perl Soundex function, with a few pure nu

Re: NetAdmin::UserGetAttributes $flag meaning?

2003-03-12 Thread R. Joseph Newton
"Jones, Jeremy" wrote: > Hello, > > Does anybody know how to decipher the numerical codes returned from a Win32 > system under the $flag field? > > for instance: > = > GetUsers("",$filter, \%names); > $flag = ""; > foreach (keys %names) { > UserGetAttributes("", > $_,$p

Re: Regular Expressions http error code

2003-03-12 Thread R. Joseph Newton
"Romeyn, Derek" wrote: > K, I tried this and it didn't work as expected: > > $code =~ / HTTP\/\d\.\d\" (\d+)/; > if (!$code) { > print "NEXT\n"; > next; > } > print "$code\n"; > > The loop just printed NEXT 300 or so times. I was thi

Re: Running a dos command with Win32::Process?

2003-03-12 Thread R. Joseph Newton
"Bakken, Luke" wrote: > > I want to know if I can open a dos command console and run a > > command on > > it (i.e. dir or cd $some_dir) with the Win32::Process module. I used > > the following code but the command didn't get pass into the new dos > > console that it opened. > > If I remember corr

Re: installing module documentation

2003-03-12 Thread R. Joseph Newton
Gary Godfrey wrote: > Hi, > > In Perl 5.6.0 I was able to add module documentation (the html files) to > c:\Perl\html\index.html by copying the files to the relevant directory in > c:\Perl\html\. They would then appear in the modules list on the left of the > page. But that doesn't work in 5.8. Is

Re: Query: System Errors

2003-03-12 Thread R. Joseph Newton
Manish Uskaikar wrote: > Hi, > > Thanks for the reply. I was working with the regular expressions wanted to > know if i can have an equivalent of > > try > { > my code here > } > catch(exception e) > { > } > > Regards > Manish U Yes. Perl does have exceptions. I didn't find out about this u

Re: No suitable installation target found for package Win32::Setupsup

2003-03-11 Thread R. Joseph Newton
Heidi Ng wrote: > Are you running Perl v5.6 or v5.8? I was doing a search on the web and > it seems like you will get this target error message when installing > other Perl modules when you have Perl v5.8 (i.e. the module and the Perl > version are not compatible) > > Heidi Version 5.8.0 build 8

Re: No suitable installation target found for package Win32::Setupsup

2003-03-11 Thread R. Joseph Newton
Heidi Ng wrote: > Use the following command to add the url to your perl repository list > and you will find the module. Let me know if you see the same "no > target found" problem after you find the module. > > ppm repository add Jenda http://jenda.krynicky.cz/perl > > Heidi I see. I get the sa

Re: No suitable installation target found for package Win32::Setupsup

2003-03-11 Thread R. Joseph Newton
Heidi Ng wrote: > Hi, > > I am trying to install the Win32::Setupsup [1.0.1] module but got the > following error message "Error: no suitable installation target found > for package Win32-Setupsup". > > The perl version I am using is 5.8.0 build 805. Can someone please tell > me how I can install

Re: PipeDelimited Input / Three File Output (Positional Characters)

2003-03-11 Thread R. Joseph Newton
"Gorden-Ozgul, Patricia E" wrote: > Is this doable in perl? Yes. > If so, how would I code it? By examining the problem, determining what steps you need to take to solve it, developing a plain-language algorithm that describes in precise terms what steps must be taken to get there, and then

Re: how to concat files easily?

2003-03-11 Thread R. Joseph Newton
[EMAIL PROTECTED] wrote: > >use File::Slurp > > > >$file1 = read_file("$fileone"); > >$file2 = read_file("$filetwo"); > >write_file($filenew,"$file1\n$file2") > > Thanks Dan, > > It's that easy! > > -Peter Even easier. There is no need to ever read file1. File 2 can be written to it in append

Re: Search and Replace

2003-03-11 Thread R. Joseph Newton
Jay Kidd wrote: > Hello, > > I need help trying to figure out what I'm doing wrong. > I'm working with 2 seperate text files both of which > contain domain names. What I'm attempting to do is > read the first file of domains and run a search based > on the contents of that file against the second

Re: image sorting....

2003-03-11 Thread R. Joseph Newton
Shawn Wilson wrote: > i have a couple of questions on File::Find and Image::Info ; > > 1. why is my if statement not working to detect when i have a directory: > last if ($file eq $dir); This will exit the loop if the value of $file is exactly the same as the value of $dir. You are probably

Re: How to Access Serial Port in Perl

2003-03-11 Thread R. Joseph Newton
David Cheng wrote: > Hi all, > > How to open, initialize, read and write to a serial port in Perl? Any advice helps, > thanks. > > David perldoc -q "serial port" Joseph -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: how to concat files easily?

2003-03-10 Thread R. Joseph Newton
[EMAIL PROTECTED] wrote: > Hi All, > > Sorry if this is a stupid question. It took me awhile to figure out I > could use the File::Copy module to copy a file, and this is about the same > level of ignorance. > > Is there an easy way to concatenate two (text) files in Perl, short of > opening two

Re: how to concat files easily?

2003-03-10 Thread R. Joseph Newton
[EMAIL PROTECTED] wrote: > Hi All, > > Sorry if this is a stupid question. It took me awhile to figure out I > could use the File::Copy module to copy a file, and this is about the same > level of ignorance. > > Is there an easy way to concatenate two (text) files in Perl, short of > opening two

Re: net-whois help

2003-03-10 Thread R. Joseph Newton
Thomas Browner wrote: > Can some one help me with the net-whois mod? This is my problem I can > not find any documentation on how to use net-whois. If some one lead me > to some please. > > I will be using with activesate. > > Thank you, > > Thomas >perldoc Net::Whois If it's installed. If not:

Re: Odd number of elements in hash assignment

2003-03-10 Thread R. Joseph Newton
deb wrote: > I'm not sure what you're saying. Since this is an anonymous hash assignment, > how do I pull out the $listkey? Do I need to pre-assign it? For example, > I tried this, added to the previous program, > > foreach $listname (sort keys %Lists) { > print "$listname:\n"; > foreac

Re: CG I Script [guestbook.cgi]

2003-03-09 Thread R. Joseph Newton
Rob Dixon wrote: > Mr. Horace Franklin Jr. wrote: > > Rob, > > Disregard the email below. > > I have one error: > > > > Software Error: > > Can't find string terminator "E_FORM" anywhere before EOF at > > cgi_guestbook.cgi line 205. > > > > The code looks good to me. What does this error mean?

Re: Odd number of elements in hash assignment

2003-03-09 Thread R. Joseph Newton
Deb wrote: > Thanks for the quick reply... > > Okay, I could use Data::Dumper, but what do you mean by empty > leading field? Am I dense? (probably!) > > I don't really want to use D::D module, so what would I do to > alleviate this? Ensure no leading white space? I'll have to > give that a try

Re: CG I Script [guestbook.cgi]

2003-03-09 Thread R. Joseph Newton
"Mr. Horace Franklin Jr." wrote: > Rob, > Disregard the email below. > I have one error: > > Software Error: > Can't find string terminator "E_FORM" anywhere before EOF at > cgi_guestbook.cgi line 205. > > The code looks good to me. What does this error mean? > > Horace Is this the first error

Re: Intranet page to manage print jobs

2003-03-09 Thread R. Joseph Newton
Todd Hemsell wrote: > Good Morning, > > > First of all I am not a Programmer. My total experience with Perl consists > of finding free scripts on the web and slightly modifying them for my > specific task. > I have been searching vainly for a script or an example of a script that > will let my use

Re: Double post ability

2003-03-09 Thread R. Joseph Newton
Dennis LaPine wrote: > I don't know why I waste my time posting the few questions that I have. This > is a "beginners" list is it not? A question asked, should not be answered > with another question. I'm not surprised in the response I got, but thought > I'd try and get an answer from some season

Re: Test for empty list

2003-03-08 Thread R. Joseph Newton
"Scott R. Godin" wrote: > > #!/usr/bin/perl -w > > > > use strict; > > > > my @array = ('', 0, "", 1); > > > > my $hasTruth; > > foreach (@array) { > > if ($_ ){ > > $hasTruth = "yezzindeedydo!"; > > last; > > } > > } > > if ($hasTruth) {print "$hasTruth has truth\n";} > > else {print

Re: explicit package?

2003-03-08 Thread R. Joseph Newton
"Mr. Horace Franklin Jr." wrote: > When I used the script. guestbook.cgi, I received the following errors.What is wrong > with the syntax/code and what is an explicit pacakage?The file guestbook.cgi is > attached.Software error: > syntax error at guestbook.cgi line 109, near "h3>" > (Might be

Re: Test for empty list

2003-03-07 Thread R. Joseph Newton
Jeroen Lodewijks wrote: > Hi all, > > Is there anybody out there who has a code snippet to test if a list is empty? > (a list is empty if all elements are either undefined or 0 or have an empty > string) > > Ofcourse I can do this: > > my $str = ''; > my $elem; > > my (@test) = (undef, ''); #put a

Re: special caracters in variables in patternmatching

2003-03-07 Thread R. Joseph Newton
Rob Dixon wrote: > Hi Scott, Francesco. > > Scott R. Godin wrote: > > Francesco Del Vecchio wrote: > > > > > suppose this: > > > == > > > $string 'I saw Roger and I said :roger? what the @*$!'; > > > > > > $var1 = "roger? what the @*$!"; > > > $var2 = "Hi roger.

Re: Someone DO explain this to me!

2003-03-07 Thread R. Joseph Newton
Jenda Krynicky wrote: > Welcome to psh 0.7.1 by [EMAIL PROTECTED] > Running under Perl 5.008 > > psh$ do {print '.';print ':';} while ($x++ < 10); > .:.:.:.:.:.:.:.:.:.:.: > psh$ do {print '.';print ':';} while ($x++ < -10); > .: > psh$ do {print '.';print ':';last} while ($x++ < 10); > .: > c:\te

Re: PErl subroutine

2003-03-06 Thread R. Joseph Newton
"Johnstone, Colin" wrote: > Gidday All, > > please help with my subroutine > Your call to this sub below offers a single string parameter--which happens to be multiline. > > sub cleanText{ > my $cleanedText = @_; #Since there is one element in @_, $cleanedText now has the value 1 or '1' > $

Re: Handling race conditions

2003-03-06 Thread R. Joseph Newton
Wiggins d'Anconia wrote: > > In general this would be handled with a lock file. When the first > instance of your script starts it would check for the lock file if it > exists then just exit, if it doesn't then it opens a file (.lock for > example) then does its processing, and then removes the lo

Re: pattern matching problems 2

2003-03-06 Thread R. Joseph Newton
Francesco del Vecchio wrote: > Maybe I can explain better showing you the real problem. > > I have an HTML form and I'm parsing it looking for tags > > When I find one I need to catch the "ACTION" value. > > i.e. > > http://www.somedomain.com method=post> > > I need to catch "http://www.somedomai

Re: truth test on a hash

2003-03-06 Thread R. Joseph Newton
jdavis wrote: if($hoh{$who}{$what} =~ /\w/){ > print "$hoh{$who}{$what}\n"; hoh? Huh?!? Where'dthatcomefrom? use strict; Joseph -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: [OT] YAPC::NA 2003 Registration

2003-03-05 Thread R. Joseph Newton
Kevin Meltzer wrote: > Hello folks, > > ... > It will be June 16-18, 2003 in Boca Raton, FL. Please visit the website > to learn more, and _to register_. If anyone has any questions, feel > free to email me off-list. > > Cheers, > Kevin Eh, which website? I didn't see a link. FWIW, yas.org [my

Re: rename() doesn't work

2003-03-05 Thread R. Joseph Newton
Jeff Westman wrote: > Yes, I tried all that. (thanks) > > This is very odd... turns out that when I tried to do a regular 'mv' command > under Unix, it too said "success" ($?=0) I found that the mount I have > my file system is non-standard Unix, so while the OS thought everything was >

Re: rename() doesn't work

2003-03-05 Thread R. Joseph Newton
Jeff Westman wrote: > Why doesn't my rename() work? It is returning a '1', meaning success (I get > the "has been modified" message below. Yet when I list the files (ls), it > shows the original file name and my tmp file name. The rename doesn't seem > to work. > > Any ideas?! > > >

Re: Managing the backslash in a string

2003-03-05 Thread R. Joseph Newton
Guy P wrote: > Look at the small program below. > The result is this: DirectionsNitprogrsourcsql > DirectionsNitprogrsourcsql > > And I would like it to be this:\Directions\unit\progr\sourcsql ... > > $reprt= "\Directions\unit\progr\sourcsql"; ...Hi Guy

Re: Help with File Handle

2003-03-04 Thread R. Joseph Newton
Hi Jeff, DONT! Smith Jeff D wrote: > I am trying to copy/move files under WinNT from remote server(s) to > a central server using File::Copy --see code snippet below: > > snippet begins-- > use File::Copy; > .. > > open (LOGFILE, ">>testlog") or die (print "$! problem opening tes

Re: Newby first little script. (Lots of errors and wrong ways of doing things)

2003-03-04 Thread R. Joseph Newton
Sudarshan Raghavan wrote: > .. > You are right it is "Good Programming practice" to be defensive. Even though > I would advocate a "close () or warn ()" instead of a "close () or die ()". > > But then again the choice is subjective, but "defensive programming" holds > always. I want to second tha

Re: please please comfirm (was Parsing variables)

2003-03-04 Thread R. Joseph Newton
Luinrandir Hernsen wrote: > Thank you for your help but I want to learn this too > > Here is the code from the HTML GET First, I am sort of mystified as to why you want to use the GET method. This method is designed specifically for cases where you want to download the specified file. It

Re: STILL NEEW SOME HELP: Using data structures to find similarities and differences

2003-03-04 Thread R. Joseph Newton
Aimal Pashtoonmal wrote: > Hello, > > I have three files, for two different cites. The first file contains > names of men with their faves, in columns. The second file is the same > but for their partner. The third file is a list of similar partners > (partner selection based on data fed into a pe

Re: Disabling ALT+CTRL+DEL in win32

2003-03-02 Thread R. Joseph Newton
Voodoo Raja wrote: > I would like to disable the ALT+CTRL+DEL when I run my perl TK application.. > > any piece of code will be appreciated. > > Thanks > Sam You're out of luck. You have no business doing this, and Windows [at least NT] will not let you. I would be interested in hearing what

Re: jumping to the end of a loop

2003-03-02 Thread R. Joseph Newton
Scott Taylor wrote: > I would not be thanking the person that told you > this was a MySQL problem. ... > > I have no problem executing this statement in MySQL, from command line > mysql, from Webmin's MySQL Database server, or strict Perl. > > You need to form this in a new question giving us d

Re: shifting through arrays of line data

2003-03-02 Thread R. Joseph Newton
Deb wrote: > This (code below) makes sense to me, but I was talking this over with a > co-worker on Friday, and then I tried putting together some 2-dimensional > hashes - which hurts my head at the moment. Hi Deb Actually, the hash hee--so far, anyway--is not two-dimensional. More later > So

Re: jumping to the end of a loop

2003-03-01 Thread R. Joseph Newton
Anadi Taylor wrote: > Hi all, > > I have written a script that reads in information from a database: name, > email, password and username. > I am then searching through this information to match an email address > entered by a user ( this script is web based ) against the email address > pulled of

Re: shifting through arrays of line data

2003-02-28 Thread R. Joseph Newton
Deb wrote: > Hi Guys, > > I have an array in which each element is a line commandline data. It looks > something like this - > > @Array contains lines: > > post1: -r [EMAIL PROTECTED] -x cat-100 -h post1 > post2: -x tel -h post2 > post3: -h post3 -x hifi The getRelationships sub here has a few l

Re: shifting through arrays of line data

2003-02-28 Thread R. Joseph Newton
"John W. Krahn" wrote: > "R. Joseph Newton" wrote: > > > > Deb wrote: > > > > > > I have an array in which each element is a line commandline data. It looks > > > something like this - > > >... > > > post1: -r [E

Re: shifting through arrays of line data

2003-02-28 Thread R. Joseph Newton
Deb wrote: > Hi Guys, > > I have an array in which each element is a line commandline data. It looks > something like this - > > @Array contains lines: > > post1: -r [EMAIL PROTECTED] -x cat-100 -h post1 > post2: -x tel -h post2 > post3: -h post3 -x hifi > > What I really need to do is build a re

Re: Display DubDirectory/Files

2003-02-28 Thread R. Joseph Newton
"Shishir K. Singh" wrote: > I am already doing the recursive look up and it works fine. However, if it's a long > hieararchy, it, it takes up some to traverse the full tree. I was curious to know if > any module exist so that I can compare the speeds. If the performance is better, I > can disca

Re: Perl Application error on windows

2003-02-28 Thread R. Joseph Newton
Madhu Reddy wrote: > > > - > > > > if you do perl -V, > NO, I didn't see that one... Is this: > perl -v The same as: perl -V ? As it turns out, no. Even though DOS/Win handles filenames as case insensitive, it hands the switches and parameters to Perl verbatim, and Perl is very much cas

Re: grabbing mime type

2003-02-28 Thread R. Joseph Newton
Dan Muey wrote: > I have a need to grab specific Mime sections of an array. > > I've looked at and tried different Mime Modules but can't seem to get it to go. > I thought about parsing it manually but I'm not sure if every message will be > formatted exactly the same, hence the module. > > The a

Re: what is this error?

2003-02-28 Thread R. Joseph Newton
Dilip v wrote: > If I do "set JDK122ROOT=c/jdk1.2.2 Try: set JDK122ROOT=c:/jdk1.2.2 Drive specifiers in DOS/Windows always take colons. The forward slashes are probably alright, though, if you are using a recent version of Perl. Let us know if that helps. -- To unsubscribe, e-mail: [EMAIL PR

Re: Divide Perl script

2003-02-27 Thread R. Joseph Newton
Chris Rogers wrote: > Just create a separate file to hold your "library" routines. You may name > the file anything you like. Be sure to put the line: > Good advice. It is a good idea to use a .pm extension, and to have a package name identical to the base name: file: rjnWeb.pm in script: pa

Re: Perl Application error on windows

2003-02-27 Thread R. Joseph Newton
Madhu Reddy wrote: > Hi, > I have following sorting program... > basically it will split the large files into small > file and creates thread..each thread will sort files > after that merge back all sorted files... > > this program works fine on single CPU machine... > same program giving proble

Re: Line Parsing

2003-02-27 Thread R. Joseph Newton
kevin r wrote: > I am writing a perl script to parse some firewall logs and I think that > there may be a better way of doing somwthing than the one that I know. > > Syslog messages look as follows (IP addresses have been changed to protect > the innocent) > > %PIX-6-106015: Deny TCP (no connectio

Re: Format and File::Find --> Help Needed

2003-02-27 Thread R. Joseph Newton
Prasad Karpur wrote: > All, > > When I try to use $pathname to get the dir name in the format section, I don't see > any value. Also where do I add the follow_skip section in the File::Find program to > skip duplicate file names. > > #!/usr/bin/perl > > use File::Find; > > format OUTPUT_TOP = >

Re: image property testing... take II

2003-02-27 Thread R. Joseph Newton
Shawn Wilson wrote: > ... my code > surely isn't written stout enough to handle a 'use strict'. if someone > could tell me what i am STILL doing wrong i'd appreciate it. Hi Shawn, Please re-examine your operating precepts. By not using strict, you are passing up the best help you can get. If

Re: what is this error?

2003-02-27 Thread R. Joseph Newton
Dilip v wrote: > Hi all, > Try 'set > JDK122ROOT=/jdk1.2.2' at bin/perl/RunJava.pm line 305. > ... > Try \'set JDK122ROOT=/jdk1.2.2\' at b...') called at > bin/perl/RunJava.pm line 305 What happened when you followed the advice offered above? Joseph -- To unsubscribe, e-mail: [EMAIL PR

Re: Cookies, CGI

2003-02-27 Thread R. Joseph Newton
Nigel Peck - MIS Web Design wrote: > I'm trying to set a cookie and have it returned to the script before the > user has to visit another page. > > I'm currently doing it like this: > > Original Cookie already set > User request -> Script returns Set-cookie and Refresh to second script > Second sc

Re: simple regex problem

2003-02-27 Thread R. Joseph Newton
Ramprasad wrote: > hello all, > > I have a file read into a single string, and I want to write a regex > that will tell me wether the file contains any non hashed line > > __DATA__ > ## FORWARD > ## FORWARD > ## VACATION > ## VACATION > __END__ > > But my regex fails in case of any blank lines or

Re: printing fields without the use of awk

2003-02-26 Thread R. Joseph Newton
brady jacksan wrote: > HI all, > > I am doing an assignment. I am writing a script to access a file and > print the first and last name of workers whose hours worked exceeded > 300hours. In the file, the last name is the first field and the first name > is the second field. Both fields are separa

Re: good general programming book?

2003-02-26 Thread R. Joseph Newton
Jose Malacara wrote: > Does anyone recommend a good general programming book? Something that's not so much > language specific, but more about methodologies, techniques, etc. I don't have a > programming background, so I tend to have the most trouble when it comes to looking > at the larger pic

Re: Mcrypt module

2003-02-26 Thread R. Joseph Newton
Tyler Longren wrote: > Hi, > > I haven't written anything in perl for quite some time, so I'm pretty rusty. > Does anyone have a perl version of this PHP code: > > function encrypt($string, $key) { > // version 2.4.x of lib mcrypt > $td = mcrypt_module_open (MCRYPT_TripleDES, "", MCRYPT_MODE_ECB

Re: Email Processing

2003-02-26 Thread R. Joseph Newton
Paul Kraus wrote: I want outlook to run a perl script for this mail message. I want the script to ... Can do, but you will probably need to learn VBA. Since Outlook is part of the Office package, VB is the native programming interface, sort of like Perl is to the CGI. Take the plunge. Y

Re: Newby first little script. (Lots of errors and wrong ways of doing things)

2003-02-26 Thread R. Joseph Newton
Johann Snyman wrote: > Hello there, > > I am a newby trying to learn pearl. I wrote my first little script, > and I would love to se where I could have done things better (in a > more proffesional way). > > Feedback would be appreciated! Hi Johann, If this is really tour first script, I would re

Re: Name of current perl script on Win32

2003-02-26 Thread R. Joseph Newton
"Gazi, Nasser (London)" wrote: > Hi, > > How can I find the name the perl script on Win32? > > I know that the usual way is to use $0 > > However, this gives me a problem on Win32 with filenames bigger than 8 > characters, where $0 returns filename filename like "FIILEMAME~" which is > useless to

Re: Dynamic Hash Naming and multi-dimensional hashes

2003-02-25 Thread R. Joseph Newton
Hendricks Paul D A1C 27 IS/INYS wrote: > Hello beginners! > > Where do I start... I've already done some reading on this and I've played > tag the wall with the forehead long enough. > What I'm challenging myself to do is to create: >a) a way to name a hash from user input Don't. If you re

Re: Help need in GUI

2003-02-25 Thread R. Joseph Newton
zentara wrote: > You must install Tk, it's a separate module. Plus > the program needs a MainLoop statement. It depends on the Perl version. When I tried to install Tk on Perl 5.6.1, I got an error message saying it was already installed. I tried the code posted in: Subject: Re: How do

Re: URGENT: help setting perl really really needed

2003-02-24 Thread R. Joseph Newton
Mo El-Awaisi wrote: > hi > > i have installed red hat 8 on my computer along with Apache, Perl/ MySQL and > PHP. i am having problems getting PERL to work. > > i try to run the following script, but no luck: I'd suggest you sort out your issues one at a time. Do not test the performance of Perl

Re: script for deleting server log files

2003-02-23 Thread R. Joseph Newton
Ronen Kfir wrote: > Hi, > > I have log files on an IIS web server (WIN2K), that I want to delete > after a couple of days, lets say -14. I want the script to run under a > schedule, and delete those files. Hi Ronen, Why waste your time programming this. If you are doing this on a W2K server, ma

Re: Adding '#' at the beginning of a file

2003-02-23 Thread R. Joseph Newton
"Leaw, Chern Jian" wrote: > open(INPUT, "$inputFile"); > close(INPUT); > ... > open(SERVICES, "$servicesFile"); > close(SERVICES); What are you doing here? Rather, what do you think you are doing here? What you are doing is nothing. Think about it this way. You are outside your house, and

<    4   5   6   7   8   9   10   11   >