Re: Module to maintain state for CGI?

2002-01-29 Thread Jeff Bisbee
* Daedalus ([EMAIL PROTECTED]) wrote: Sounds like somthing that probably has a module already written ;-) So, as I start searching through CPAN, I thought I'd drop a note to the list and see if someone could shorten my search and send me in the right direction. There are a couple of easy

Re: learn java

2002-01-29 Thread Curtis Poe
--- william [EMAIL PROTECTED] wrote: Where can I learn java (beginner) instead on the java.sun.com? William, Needless to say, on a beginning CGI list aimed at Perl programmers, you're probably not going to get a lot of responses. However, in the interest of keeping this a helpful and

Re: shebang line that works for multiple Perl binary locations

2002-01-29 Thread John
Special need is to have the script run under apache on both NT and linux. The suggestion of putting #!perl on NT for Apache seems to require perl to be in the path (though I haven't tested). Nor did I test setting mime or whatever in Apache to see if it would pick it up. Again, default

Re: help!

2002-01-29 Thread fliptop
Curtis, Jonathan wrote: sub have_we_met{ open DATA, bigdawgs.txt; @data = DATA; close DATA; $ $found = 0; for ($i = 0; $i = $#data; $i++){ @cheese = split /,/, $data[$i]; if ($cheese[0] eq $ntlogin) { $found=1;

Re: help!

2002-01-29 Thread Curtis Poe
--- Curtis, Jonathan [EMAIL PROTECTED] wrote: This subroutine takes the user's login name ($ntlogin) and searches the flat file for matching entry. The flatfile contains user info, comma delimited... each user separated by line. The flatfile is read by line into @data, then splits each

Re: Module to maintain state for CGI?

2002-01-29 Thread Eric Pretorious
Bill: Ruben Lerner (At the Forge, Linux Journal Magazine) has written a series of articles about using Mason to maintain state. That's all I know on that subject. On a related note: Have you considered using cookies? -- Eric P. Los Gatos, CA On Mon, 28 Jan 2002, Daedalus wrote: Hi all,

Re: learn java

2002-01-29 Thread Eric Pretorious
On Tue, 29 Jan 2002, william wrote: Where can I learn java (beginner) instead on the java.sun.com? Probably by asking that question on a java-related mailing list. -- Eric P. Los Gatos, CA -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: learn java

2002-01-29 Thread Talha Masood
If you know C++ there are quite a number of excellent books on java for c++ users otherwise there is an excellent book by deitel and deitel of java...and there is one by ivor harton If you need the name of the books feel free to email me and I will get back 2 u with the names. Happy

Re: help!

2002-01-29 Thread John
This is returning multiple values - that could be considered bad (allowed in Perl but questionable in practice). You might ass in a reference to a hash or something, then set attributes of the hash for each value that needs to be returned, return a true by default, false if read file error.

RE: help!

2002-01-29 Thread Bob Showalter
-Original Message- From: John [mailto:[EMAIL PROTECTED]] Sent: Tuesday, January 29, 2002 1:12 PM To: [EMAIL PROTECTED] Cc: Beginners-Cgi@Perl. Org (E-mail) Subject: Re: help! Doesn't this leave the file open during the while? It might be OK in this case depending on the size

How do I Configure Perl for use with a Personal Web Server?

2002-01-29 Thread Sir Douglas Cook
How do I Configure Perl for use with a Personal Web Server? The skinny, I am on my home computer running Windows 98 second edition with ActiveState Perl installed and I can write scripts to the MS-Dos window. I am also using the Personal Web Server that comes with Windows 98 and I don't know

RE: How do I Configure Perl for use with a Personal Web Server?

2002-01-29 Thread John
I don't know anything about PWS, but regarding Linux, if you have a fast internet connection you can install Debian over 98 at no cost and very easily with only a few floppies. X is apparently still a nightmare to configure but everything else makes it worthwhile. http://www.debian.org and you

Re: How do I Configure Perl for use with a Personal Web Server?

2002-01-29 Thread Jeff Bisbee
* Sir Douglas Cook ([EMAIL PROTECTED]) wrote: How do I Configure Perl for use with a Personal Web Server? The skinny, I am on my home computer running Windows 98 second edition with ActiveState Perl installed and I can write scripts to the MS-Dos window. I am also using the Personal Web

Re: SSL and HTTPS

2002-01-29 Thread Jon Molin
You have the best(tm) webserver out there: www.apache.org, you can add mod_ssl to it and there you go. An alternative could be http://www.apache-ssl.org/ (not the same as apache with mod_ssl) /Jon Gary Hawkins wrote: CommerceSQL uses Perl and needs https, secure server. I already asked

Re: listing files

2002-01-29 Thread Jon Molin
Michael Pratt wrote: This is what I want to do and I dont know where to start: List files in a directory taking that list with just the filename and no other information. using that information and populating a listbox. Check out 'perldoc -f opendir perl'. Perhaps the File:: modules suits

Re: listing files

2002-01-29 Thread Sudarsan Raghavan
Michael Pratt wrote: This is what I want to do and I dont know where to start: List files in a directory taking that list with just the filename and no other information Use the glob operator of perl (perldoc -f glob) while (*) { print $_\n; } This should print

acces to a data base on reading

2002-01-29 Thread mb
Hi, I'm working on a database witch had her own ODBC driver(it is declared that the database organized in files, one for each tables, accessible on read, write and update ~~) So there is no problem for writing tuples and there is no way to read any thing from any tables(I tryed with ODBC module

Re: HTML Generation

2002-01-29 Thread Alan C.
Amongst others, 10 weeks basic to advanced, how to generate an html page, a guestbook as well as add/append entries to that same html page. http://perl.about.com/library/p101/bl_p101class.htm At 01:59 PM 1/28/2002 -0500, you wrote: Hi all, Working on a CGI script that will allow me to take

Can't locate Net:/FTP.pm in @INC (error)

2002-01-29 Thread Dhiraj P Nilange
Hi. I have ActivePerl on my computer. When I give the following statement :- use Net::FTP; and I try to run the program from command line. The Perl gives error as below:- Can't locate Net:/FTP.pm in @INC (@INC contains F:/Perl/lib .) at line 1. BEGIN failed--compilation aborted at line 1

Re: How to prevent redefining a variable with use strict?

2002-01-29 Thread sfritz
my $a = $a;#refrences whatever was the scoped $a before in the following paragraph I said global var, meant lexical. my bad =/ -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

quick POP3 question

2002-01-29 Thread Chris Zampese
Hello again, I love you guys, really I do!! (shameless greasing, but also true appreciation!) I have the Mail::Pop3Client module installed. I have it running with the debug option on, and it appears to me that the server (pop3.xtra.co.nz) is accepting the user and password that I send

Comparing strings

2002-01-29 Thread ekayes
Hi I wish to do string comparisons where the case is ignored, for example: $one = ExanPle; $two = example; if ($one eq $two){ THIS RETURNS TRUE What do I add so that the comparison ignores the case? Thanks in advance eddie -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

Re: Comparing strings

2002-01-29 Thread Sudarsan Raghavan
[EMAIL PROTECTED] wrote: Hi I wish to do string comparisons where the case is ignored, for example: $one = ExanPle; $two = example; if ($one eq $two){ THIS RETURNS TRUE if (lc($one) eq lc($two)) { #perldoc -f lc HTH, Sudarsan What do I add so that the

Re: Comparing strings

2002-01-29 Thread Chris Zampese
dont know if this helps, but the following code $one = ExamPle; $two = example; if ($one=~/$two/i) { print true ; } print false; outputs: true false (ie evaluates the expression in the curly braces) and if you change the top word to ExanPle (change the m to n) then it only outputs: false

Re: Comparing strings

2002-01-29 Thread Chris Zampese
me again :) Just realised that I did not give you an explanation of why this works... The expression is a simple regex (see Perl Documentation). The =~ is sort of the 'equal to' part, and the i at the end makes the comparison case insensitive. -- To unsubscribe, e-mail: [EMAIL PROTECTED]

Re: Comparing strings

2002-01-29 Thread Jonathan E. Paton
Don't know if this helps, but the following code $one = ExamPle; $two = example; if ($one=~/$two/i) { print true ; } This is a bad idea for anything other than throwaway scripts... it requires building a full regex everytime (from $two). You *MUST* use quotemeta() on $two to

Trying again

2002-01-29 Thread ekayes
Hi I've asked this before, I've subsequently discovered that there are aliases for the types, A for ascii and I for binary and that the types are functions in the Net::FTP module and not parameters. Any suggestions would be appreciated. Thanks, again eddie -- Forwarded by

RE: What's wrong with this?

2002-01-29 Thread Gary Hawkins
If you want to loop over all the form fields, you'd do: for $field (param()) { print $field = , param($field), br\n; } How can the param's be placed into a new hash? I'm working with a script that uses a lot of $data{'each_thing'} from %data. I tried replacing all instances with

Re: How to prevent redefining a variable with use strict?

2002-01-29 Thread Jenda Krynicky
From: sfritz [EMAIL PROTECTED] having two my $name = Sean Fritz; my $name = Sean W. Fritz; #functions as the shown assignment statment, just functions as an assignment statment (I believe) and dosen't alocate any memory or destroy the previous variable. I could be

Re:foreach issue

2002-01-29 Thread Jorge Goncalvez
Hi I have this: $but-configure(-state=$state); $Entry-configure(-state=$state); $box-configure(-state=$state); $box2-configure(-state=$state); $box3-configure(-state=$state); and I wanted to simplify it by @configure=($but,$Entry,$box,$box2,$box3); foreach

RE: What's wrong with this?

2002-01-29 Thread Jeff 'japhy' Pinyan
On Jan 29, Gary Hawkins said: If you want to loop over all the form fields, you'd do: for $field (param()) { print $field = , param($field), br\n; } How can the param's be placed into a new hash? CGI.pm has a Vars() method, I believe, which returns a hash. use CGI; my $q =

Using Netcat thru Perl

2002-01-29 Thread Darkwing
Hi Let me first say that I am using Active Perl 5.6 on Win2K, and have only been doing perl for about 3 hours at this time.. I have however already mannaged to get a very good understanding of the whole system, but not good enough for me to know where to look for help with this problem, that is

RE: What's wrong with this?

2002-01-29 Thread Jonathan E. Paton
If you want to loop over all the form fields, you'd do: for $field (param()) { print $field = , param($field), br\n; } How can the param's be placed into a new hash? my %hash = param(); since param() detects whether it's in list/array/hash context and does the Right

RE: What's wrong with this?

2002-01-29 Thread Jeff 'japhy' Pinyan
On Jan 29, Jonathan E. Paton said: How can the param's be placed into a new hash? my %hash = param(); since param() detects whether it's in list/array/hash context and does the Right Thing. These is no such thing as hash context or array context. There is void context, scalar context, and

Redirect error to file using system()

2002-01-29 Thread Kipp, James
Hi I am working on an NT script which uses system(). I can not get it to write errors to stderr instead of stdout. it works fine from the command line. see code snip below. any ideas? thanks Jim -- foreach $user (@users) { system(NET SEND $user testing 2err.out); } --- -- To

RE: What's wrong with this?

2002-01-29 Thread Brett W. McCoy
On Tue, 29 Jan 2002, Jeff 'japhy' Pinyan wrote: On Jan 29, Jonathan E. Paton said: How can the param's be placed into a new hash? my %hash = param(); since param() detects whether it's in list/array/hash context and does the Right Thing. These is no such thing as hash context or

TIME

2002-01-29 Thread Amy sing
Does anyone have a script that will give the local time.. please help.. __ Do You Yahoo!? Great stuff seeking new owners in Yahoo! Auctions! http://auctions.yahoo.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail:

Re: TIME

2002-01-29 Thread Tanton Gibbs
my $time = localtime; print $time\n; perldoc localtime - Original Message - From: Amy sing [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Tuesday, January 29, 2002 11:17 AM Subject: TIME Does anyone have a script that will give the local time.. please help..

Re: TIME

2002-01-29 Thread Jeff 'japhy' Pinyan
On Jan 29, Amy sing said: Does anyone have a script that will give the local time.. please help.. perl -le 'print scalar localtime' perldoc -f localtime perldoc -f gmtime -- Jeff japhy Pinyan [EMAIL PROTECTED] http://www.pobox.com/~japhy/ RPI Acacia brother #734

Re: TIME

2002-01-29 Thread Jason Purdy
I'm sure you'll get a lot of feedback on this, but here's my first stab: Check out 'perldoc -f localtime' localtime is the function I believe you're looking for, which will return an array of local time information that you can use however you want. Jason If memory serves me right, on

Remain Days of Month Leap Year Question

2002-01-29 Thread Darryl Schnell
Greeting's All, I am currently working on a prorate billing routine for an online form and need a bit of guidance. The idea behind the program is to take 19.95 and divde that by the total of remain days in the month, using the day of the month the user filled out the form as the starting

Re: Remain Days of Month Leap Year Question

2002-01-29 Thread Jeff 'japhy' Pinyan
On Jan 29, Darryl Schnell said: I am currently working on a prorate billing routine for an online form and need a bit of guidance. The idea behind the program is to take 19.95 and divde that by the total of remain days in the month, using the day of the month the user filled out the form as the

RE: Remain Days of Month Leap Year Question

2002-01-29 Thread McCollum, Frank
I've never done this, but it seems to me it would be nice to set up the days per month in a little hash table. %calendarDays ( january = 31, february = 28, ) #or should the order be reversed? I'm not that familiar with Hashes. Then have a check in there that grabs the date (see previous

Re: Remain Days of Month Leap Year Question

2002-01-29 Thread Jason Purdy
I would install (if it's not on your system already) and check out the documentation for Time::Local. It will allow you to set up the date from a month, day and year, from which, you could work it out. I wrote this (baby-talk) script that would output the last day given the month (from

RE: Redirect error to file using system()

2002-01-29 Thread Kipp, James
from a command line 2 will redirect standard error. open(STDERR,err.out); works fine, thanks -Original Message- From: Timothy Johnson [mailto:[EMAIL PROTECTED]] Sent: Tuesday, January 29, 2002 10:50 AM To: 'Kipp, James '; [EMAIL PROTECTED] Subject: RE: Redirect error to file using

Re: Remain Days of Month Leap Year Question

2002-01-29 Thread Jason Purdy
Leap-year is a little more complicated than that (from http://www.ips.gov.au/papers/richard/leap.html): A year is a leap year (and so contains a February 29) if it is divisible by 4. But if the year is also divisible by 100 then it is not a leap year, unless it is divisible by 400. A neater

Comparing files

2002-01-29 Thread ABhagwandin
I have two lists of objects in two files. I need a way to compare these two files and: 1- report any objects in File A that are not in File B 2- report any objects that are in File B but not in File A 3- Restriction: I am not working with a modern version of Perl, I am restricted to the

forking perl

2002-01-29 Thread charles
hello all, i am thinking of adding the ability to fork into a script i've written recently. the script acts on a list of nodes. currently it does this, one at a time, which could prove to be a lengthy process for longer lists. i was thinking that fork would allow me to spawn child pids and

RE: Remain Days of Month Leap Year Question

2002-01-29 Thread Darryl Schnell
Thank-You all regarding this matter. It works great. I should have been able to figure this one out on my own, guess I need to brush or relearn how to use the Time function. Thanks Again, -Original Message- From: Jason Purdy [mailto:[EMAIL PROTECTED]] Sent: Tuesday, January 29, 2002

Re: Comparing files

2002-01-29 Thread charles
If you are just looking to see if X from file one is in file two, and vice versa, you may want to look at p147 in the Cookbook. It's example is comparing the hash keys of two seperate hashes. If you place each line of your file into a hash and the other file in another hash, and compare the

Re: forking perl

2002-01-29 Thread Tanton Gibbs
pretty much you can just make minor changes and say my $pid; for my $node(@devices) { if( $pid = fork ) { next; } elsif( defined( $pid ) ) { #do subroutines here on $node } else { die Could not fork!\n; } } This way, you will spin off one process for each node in the

Re: Comparing files

2002-01-29 Thread Jason Purdy
Feel like I'm back in comp-sci, but this time, they'll actually let me use a real language (don't get me started on Turing ;)). I wrote this simple script that should work with 5.003... Jason #!/usr/bin/perl -w # call this with 2 params, such as # diff.pl [file1] [file2] use strict; my

Re: quick POP3 question

2002-01-29 Thread Sean O'Leary
At 05:55 AM 1/29/2002, you wrote: I have the Mail::Pop3Client module installed. I have it running with the debug option on, and it appears to me that the server (pop3.xtra.co.nz) is accepting the user and password that I send (it says OK please send PASS command, then OK /USER? is welcome).

RE: TIME

2002-01-29 Thread Timothy Johnson
Here's a snippet of code I use to refresh my memory from time to time as to what localtime() returns. ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(); The only thing you have to remember is that the $mon variable is actually one less than the current month(it starts at 0),

Re: Comparing files

2002-01-29 Thread Jeff 'japhy' Pinyan
On Jan 29, [EMAIL PROTECTED] said: 1- report any objects in File A that are not in File B 2- report any objects that are in File B but not in File A This sounds like the job for two hashes. It also happens to be in the FAQ under the heading How do I compute the difference of two arrays? How

RE: Remain Days of Month Leap Year Question

2002-01-29 Thread Timothy Johnson
You can also check out the Date::Calc module at www.engelschall.com/u/sb/download/Date-Calc/ It simplifies a lot of date calculations including the number of days in the month, days 'till the end of the year, leap years, etc. -Original Message- From: Darryl Schnell [mailto:[EMAIL

Re: Comparing files

2002-01-29 Thread Jeff 'japhy' Pinyan
On Jan 29, Jason Purdy said: my ( @filea, @fileb, @inAButNotInB, @inBButNotInA ); I don't see any hashes being used. This feels like it's going to be very inefficient. open ( FILEA, shift ) || die Cannot open 1st file: $!\n; @filea = FILEA; close ( FILEA ); open ( FILEB, shift ) || die

Re: Comparing files

2002-01-29 Thread Jason Purdy
*laugh* - Thanks for the pointers and consider myself better learned. :) Hmm ... now I better go hunt down all those greps in my scripts... Jason If memory serves me right, on Tuesday 29 January 2002 13:26, Jeff 'japhy' Pinyan wrote: On Jan 29, Jason Purdy said: my ( @filea, @fileb,

parsing output

2002-01-29 Thread Duarte Cordeiro
Helo, this is my first try with perl. I've programmed mainly in C-style languages and lisp, and I know that my code isn't very perl-like. So, can somebody enlight me of a better way to right this ? Thanks for your time, Duarte Problem: Write a program that receives two arguments: a ip

Re: Two dimensional hash

2002-01-29 Thread Matt C.
This works for me from the command line. I like the arrow syntax for datastructures, as it allows me mind to see what's going on (which is hard for me to do sometimes with datastructures). perl -e $name{adams}{alice}='HELLO WORLD'; print $name{adams}-{alice}; The camel book has a ton of stuff

RE: Question on PERL coding style...

2002-01-29 Thread Hanson, Robert
It goes around it. You need to call a subroutine for it to be executed... although it will still be compiled, which could cause compilation errors even before the script starts to run. Rob -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Sent: Tuesday, January 29,

Re: comparing strings

2002-01-29 Thread Collins, Joe (EDSI\\BDR)
Worth reading, including the end where Jonathan expands on his earlier post. -Original Message- From: Jonathan E. Paton [mailto:[EMAIL PROTECTED]] Sent: Tuesday, January 29, 2002 1:32 PM To: Collins, Joe (EDSIBDR) Subject: RE: Comparing strings | Don't know if this helps, but the

RE: Question on PERL coding style...

2002-01-29 Thread McDonald Patrick
Perl will only execute subroutines when called. It is recommended that you group all subroutine defintions either at the beginning or the end of the program. Pat -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Sent: Tuesday, January 29, 2002 1:38 PM To: [EMAIL

Re: Two dimensional hash

2002-01-29 Thread Jonathan E. Paton
Suppose I have a two dimensional hash: $name{Adams}{Alice} = 1; $name{Adams}{Bob} = 2; $name{Bull}{Adam} = 3; etc. Given the first key, is there a way to pull out a second key, if I don't care which one? my ($first) = keys %{$name{Adams}}; That answers the question as

Re: mailing captured output with template text

2002-01-29 Thread Gary
You have gotten lots of suggestions about the system call etc. So I do not have much to say about that other than to point out that the code you have written is not very portable (since it relies on the unix command df). If you want a platform independent solution there is a perl alternative to

Re: Win32 Question - Detecting floppy in drive...

2002-01-29 Thread Sean O'Leary
Wow, a Prodigy email address... I remember using them back in the day. I'm kinda surprised they are still with us. At 12:25 PM 1/28/2002, you wrote: In VB, I can make an API call (Can't remember what it is off the top of my head) that will basically look at the drive and detect if I need to

writing formats

2002-01-29 Thread Thunem, Tom
can anyone tell me how to toggle between 2 different formats writing to the same output filehandle? i am not having luck with coding the select and write statements. thanks Tom Thunem Sr. Systems Specialist, Global E-Business Infrastructure, Americas Avnet, Inc. [EMAIL PROTECTED] -- To

Re: writing formats

2002-01-29 Thread Jeff 'japhy' Pinyan
On Jan 29, Thunem, Tom said: can anyone tell me how to toggle between 2 different formats writing to the same output filehandle? i am not having luck with coding the select and write statements. By default, the format for any given filehandle has the same name as the filehandle itself. To

File Flushing

2002-01-29 Thread RArul
Friends, How can we can programatically control the flushing out of an output buffer so that during an iterative process, the contents can be periodically flushed out to the output buffer? Say, in this test snippet code, what should I do in order to flush the contents for every 10th record? -

dir/file from ftp site

2002-01-29 Thread Dhiraj P Nilange
I want to connect to a ftp site and in I want to get a list of all files and directories in some given directory. I know how to do that using Net::FTP package. I want to know that after issuing what will be easiest way to check whether each entry in the directory list is a file or a directory? I

Re: File Flushing

2002-01-29 Thread Peter Scott
At 03:39 PM 1/29/02 -0500, [EMAIL PROTECTED] wrote: Friends, How can we can programatically control the flushing out of an output buffer so that during an iterative process, the contents can be periodically flushed out to the output buffer? Say, in this test snippet code, what should I do in

Re: writing formats

2002-01-29 Thread William.Ampeh
The trick is to make sure that your output file has the same name as your main format routine. So in my case I have: select (STDOUT); and format STDOUT = The STDOUT_TOP is automatically selected at the beginning of each page. Maybe this will help (that is if it is not too late) The

a very simple question

2002-01-29 Thread Dhiraj P Nilange
Hello actually its very simple to answer for who knows basic perl. Suppose I have a string in $str I wanto extract some part of it based on regex and store it in the same string. how do i do that? say... $str=~ $str /\d\d\s*$/; but this doesnt work. seems some syntax problem.. help -dhiraj

Re: a very simple question

2002-01-29 Thread Tanton Gibbs
Just put the part you want to extract in parentheses and then set $str equal to $1...for example: $str =~ /(\d\d\s*)$/; $str = $1; - Original Message - From: Dhiraj P Nilange [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Tuesday, January 29, 2002 4:12 PM Subject: a very simple question

RE: a very simple question

2002-01-29 Thread RArul
Tanton: I am sure we could do it in one step as this: $str =~ s/(\d\d\s*)$/$1; Right? -- Rex -Original Message- From: Tanton Gibbs [mailto:[EMAIL PROTECTED]] Sent: Tuesday, January 29, 2002 4:18 PM To: Dhiraj P Nilange; [EMAIL PROTECTED] Subject: Re: a very simple

RE: dir/file from ftp site

2002-01-29 Thread Hanson, Robert
The ls -l is the only way I can think of, and it is pretty easy to parse the output. # Your @data will come from the FTP server, mine came from # the command line. my @data = `ls -l`; for ( @data ) { my $idDirectory = (/^/) ? 1 : 0; my $filename = [split /\s+/]-[8];

Re: a very simple question

2002-01-29 Thread Jonathan E. Paton
Suppose I have a string in $str, I want to extract some part of it based on regex and store it in the same string. how do I do that? say... $str=~ $str /\d\d\s*$/; ($str) = $str =~ /(\d\d)\s*$; # Takes last two digits # off end of string Jonathan Paton

RE: Question on PERL coding style...

2002-01-29 Thread John
If you put them in a module are they parsed before they are called? Does it matter whether you use use or require? When is it better to specify subroutines when you use use? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: quick POP3 question

2002-01-29 Thread Jose Vicente
Hi friends. I am looking for a module to access ACCESS DATABASES, please if you have any information send me it. Thanks in advance. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Set Up variables

2002-01-29 Thread Jose Vicente
Hi, again. What I have to do in this case: in README file of that module I find: set-up these environment variables: DBI_DSN The dbi data source, e.g. 'dbi:ODBC:YOUR_DSN_HERE' DBI_USER The username to use to connect to the database DBI_PASS The username to use to connect to the

function prototyping

2002-01-29 Thread John
Does anyone have a cheetsheat for function prototyping - how to say that a parameter is a scalar, array, hash, reference, etc., and whether it is required or optional? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: a very simple question

2002-01-29 Thread Tanton Gibbs
yep, that'll work too. - Original Message - From: [EMAIL PROTECTED] To: [EMAIL PROTECTED]; [EMAIL PROTECTED]; [EMAIL PROTECTED] Sent: Tuesday, January 29, 2002 4:18 PM Subject: RE: a very simple question Tanton: I am sure we could do it in one step as this: $str =~ s/(\d\d\s*)$/$1;

Re: a very simple question

2002-01-29 Thread Chas Owens
I assume you want $str = $1 if $str =~ /(\d\d\s*$)/; always make sure to test for a match before using $1, $2, etc. If you don't you may get a runtime warning. On Tue, 2002-01-29 at 16:12, Dhiraj P Nilange wrote: Hello actually its very simple to answer for who knows basic perl.

RE: a very simple question

2002-01-29 Thread Jonathan E. Paton
Tanton: I am sure we could do it in one step as this: $str =~ s/(\d\d\s*)$/$1/; Right? Sorta, that'll take the end of the string according to the match, and REPLACE IT with the end of the string - handy huh. So it matches: '34 ' from: 'JunkJunkJunk34 ' and adds it to the

Re: a very simple question

2002-01-29 Thread Jonathan E. Paton
I assume you want $str = $1 if $str =~ /(\d\d\s*$)/; always make sure to test for a match before using $1, $2, etc. If you don't you may get a runtime warning. Only when you try to use $str later when it is undefined. It should be checked, but perhaps not in the same place. This

Re: function prototyping

2002-01-29 Thread Chas Owens
On Tue, 2002-01-29 at 15:38, John wrote: Does anyone have a cheetsheat for function prototyping - how to say that a parameter is a scalar, array, hash, reference, etc., and whether it is required or optional? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional

Re: function prototyping

2002-01-29 Thread Curtis Poe
--- John [EMAIL PROTECTED] wrote: Does anyone have a cheetsheat for function prototyping - how to say that a parameter is a scalar, array, hash, reference, etc., and whether it is required or optional? John, Here's the cheatsheet for function prototypes: Don't use 'em. There are a

RE: Question on PERL coding style...

2002-01-29 Thread Curtis Poe
--- John [EMAIL PROTECTED] wrote: If you put them in a module are they parsed before they are called? Does it matter whether you use use or require? When is it better to specify subroutines when you use use? See perldoc -f use and perldoc -f require. use happens at compile time. When a

Perl path for windows 98

2002-01-29 Thread Angus Laycock
Hi, I have just downloaded PERL and set it up on my machine at home. Is there a path (#!/whatever ) I can put at the top of my script instead of typing perl myscript.pl to execute the script in Windows 98. Thanks in Advance Gus

RE: Perl path for windows 98

2002-01-29 Thread Timothy Johnson
When you say that you downloaded PERL, what distribution did you download? For Win32 platforms, the standard seems to be ActivePerl, which can be found at http://www.activestate.com. Running the Installer on their site should set up the appropriate file associations. The #! line is not

RE: Perl path for windows 98

2002-01-29 Thread Hanson, Robert
The shebang line (#!) is ignored in Windows*, but if the file association of Perl is set up correctly Windows should be able to run it just by typing myscript.pl at the command line. * Any flags on the shebang line will be used. Like warnings (-w) and such. Rob -Original Message-

Re: Perl path for windows 98

2002-01-29 Thread Angus Laycock
Tim, I have loaded up ActivePerl and read the Readme file and run the example.pl script which said it loaded OK. But reading on it said that the extension should be set up. I have checked my Settings Folder options file types and there is no PERL or PL extension. I was curious if there was

2 questions

2002-01-29 Thread Naveen Parmar
1) How do you define global lexical variables in Perl? 2) Is the arrow (-) a commonly used Perl operator? TIA, - NP _ Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp. -- To unsubscribe, e-mail: [EMAIL

RE: Perl path for windows 98

2002-01-29 Thread Timothy Johnson
Oh, you want to run it without the extension! Now that's a different question than I thought you were asking. You need to add the .pl extension to the PATHEXT environment variable. I'm not 100% sure of the best way to do this in W98. You might be able to get away with adding the line: SET

RE: Perl path for windows 98

2002-01-29 Thread McCollum, Frank
Sure. Assuming perl is in the default location type #!C:/Perl/bin/Perl.exe If this does not work Alternatively, go to My Computer - View - File Types - Add a new type - Call it Perl - specify .pl as extension - Add an action called Open - then C:\Perl\bin\Perl.exe %1 %* in the action field.

newbie question

2002-01-29 Thread Thunem, Tom
I've never understood what the 'make' and 'make install' commands do. Can someone shed the light? Thanks Tom Thunem Sr. Systems Specialist, Global E-Business Infrastructure, Americas Avnet, Inc. [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail:

RE: 2 questions

2002-01-29 Thread Hanson, Robert
All variables are global in nature unless you declare them in a lexical scope. $foo = Hello Naveen; if ( 1 ) { my $x = 1; } In this example $foo is global, and $x is local to the if-block only. And yes, - is used quite often when you start using references or classes (a module that acts

RE: newbie question

2002-01-29 Thread Hanson, Robert
make is a utility for managing programming projects. The Makefile is a script that tells make how to do stuff. When you install a Perl module it looks like this: perl Makefile.PL This is a perl script that creates a file called Makefile based on your configuration. make The program make

Re: 2 questions

2002-01-29 Thread Curtis Poe
--- Naveen Parmar [EMAIL PROTECTED] wrote: 1) How do you define global lexical variables in Perl? 2) Is the arrow (-) a commonly used Perl operator? TIA, - NP Global variables may be defined in several different manners. 1. Fully qualified with package name: package Foo;

Re: quick POP3 question

2002-01-29 Thread Chris Zampese
thanks for the advice, but I think that it is a problem with the way the network is set up as I am running that exact code (straight from the documentation). Cheers anyway :) this was in reply to... I have the Mail::Pop3Client module installed. I have it running with the debug option on,

  1   2   >