Re: use of modules with authorize.net

2001-06-21 Thread fliptop
Susanne wrote: does anyone have sample code that would educate me on credit card processing with authorize.net? tia. try this module from cpan: http://search.cpan.org/search?dist=Business-OnlinePayment-AuthorizeNet

System Control

2001-06-21 Thread Thanh To
Hi All, Does anyone know why Perl did not get back the system control after called the Java's Applet? I'm using the system command: system (java HelloJava); And the problem is: Perl did not execute any of the following lines after that. I'd like to know why. Thanks in advance! Thanh

Re: need code

2001-06-21 Thread Alen Sarkinovic
I only had problems with executing script from web. It's for sure that I will blok any char ,accept numbers letters and underline. My problem was ,that I coudn't force script to accept variable input and execute command (from web). now everything works fine,it was mestake in command syntax.

Re: Re: Running CGI's locally

2001-06-21 Thread Mel Matsuoka
At 12:10 PM 06/20/2001 +0200, Aaron Craig wrote: At the office, I'm running Apache 1.3 locally on Win2000, and I don't have to use the shebang line, as I have Perl in my path. However, I just installed Apache on my Win2000 machine at home, using the current Apache installation for Windows

RE: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Moon, John
Here the code (is this what you wanted ?) but from Mel's reply looks like the problem could be the endform use strict; use CGI qw(:standard :all *table); use vars qw($dbh $REQUEST) ;# global ! use DBI; use Cwd; my $CGI_HOME=cwd();# get $home # use lib

Re: How to learn Perl??

2001-06-21 Thread Dennis Waller
Twinkles, etal I'm another newbie jumping in. I went to the referenced URL: http://www.perl.com/pub/language/info/software.html I didn't see anything about MSI, I jumped to the Win32 section. That tries to send you to ActiveStates ActivePerl, which when I tried it

RE: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Kurt Edmiston
print $q-endform, \n; # offending code maybe ? == == # # form for input of estimates, sends confirmation/results of submit # to toolbar ... # I'm not sure if this is what you want, but couldn't you just replace the above line of code with print /FORM; That will at least get rid

mail extensions

2001-06-21 Thread Cheryl Kirkpatrick
I have some simple Perl scripts that I use for several forms that have been working correctly for several months. This week we got a new firewall and now my forms do not work. The user submitting the form does not see any error and believes we have received the information inputted by the form. I

RE: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Curtis Poe
Hi John, There are a variety of issues with this, so I'll take it from the top, but starting with the issue with you are concerned. I hope you don't take any of this personally, as it's just intended to be helpful: print $q-endform; This does indeed print the hidden field that you are

Re: mail extensions

2001-06-21 Thread Curtis Poe
--- Cheryl Kirkpatrick [EMAIL PROTECTED] wrote: I have some simple Perl scripts that I use for several forms that have been working correctly for several months. This week we got a new firewall and now my forms do not work. The user submitting the form does not see any error and believes we

Re: php - perl

2001-06-21 Thread William McKee
On 15 Jun 2001, at 10:25, Curtis Poe wrote: To do it manually, use the following and set $mime_type to whatever value you want (see W3C website for complete list): print Content-type: $mime_type\n; With all due respect, your print statement is why I recommend to people that they should

RE: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread William McKee
On 21 Jun 2001, at 9:50, Curtis Poe wrote: foreach ($q-param) { $REQUEST{$_}=$q-param($_); } I assume that you know your form better than I do, but are you aware that the above snippet will only return the first value for a param if that param has several values? For many forms,

RE: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Curtis Poe
--- Moon, John [EMAIL PROTECTED] wrote: Yes, ... it's gone ... Thanks ... Interestingly, doesn't appear on subsequent calls to endform ... so I'm a little concerned I don't understand what CGI (or I) am doing ... it would seem like it should always give the same results ... A quick

RE: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Curtis Poe
--- William McKee [EMAIL PROTECTED] wrote: On 21 Jun 2001, at 9:50, Curtis Poe wrote: foreach ($q-param) { $REQUEST{$_}=$q-param($_); } I assume that you know your form better than I do, but are you aware that the above snippet will only return the first value for a param if

Re: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Randal L. Schwartz
Curtis == Curtis Poe [EMAIL PROTECTED] writes: Curtis my $foo_count = scalar @{[param('foo')]}; That's nice, but I prefer: my $foo_count = () = param('foo'); Less typing, less work for the machine. Less noise. More magic, though. Oops, arguable on that. :) -- Randal L.

RE: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Tillema, Glenn
Curtis == Curtis Poe [EMAIL PROTECTED] writes: Curtis my $foo_count = scalar @{[param('foo')]}; That's nice, but I prefer: my $foo_count = () = param('foo'); Less typing, less work for the machine. Less noise. More magic, though. Oops, arguable on that. :) --

RE: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Tillema, Glenn
my $foo_count = () = param('foo'); Tillema, Let me guess ... param('foo') is assigned to a list Tillema,... the list is assigned Tillema, to $foo_count in a scalar context so the number of Tillema, elements are returned. Tillema, Right? Probably simpler than that. param is

RE: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Moon, John
Curtis, Thank you for the suggestion ... This is for beginners and I have a lot to learn ! ... I'll use the OO format - just got lazy ... never used strict before because it was s strict but some guy named Curtis (and others) kept saying to use it so Thanks for letting me know about

Re: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Randal L. Schwartz
Tillema, == Tillema, Glenn [EMAIL PROTECTED] writes: There's never a list assigned to $foo_count in a scalar context... the phrase doesn't even make sense to me. :) You can't assign a list to $foo_count. It can never happen. Never. A list cannot exist in a scalar context... the guts of

RE: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Tillema, Glenn
Tillema, That's how it was phrased in the camel; List Tillema, assignment in scalar context Tillema, returns the number of elements produced by the Tillema, expression on the _right_ side Tillema, of the assignment... Your explanation certainly Tillema, goes into much more detail,

Re: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Mel Matsuoka
At 04:21 PM 06/21/2001 -0400, Timothy Kimball wrote: Randal L. Schwartz wrote: : ... : Second might mean something like: : : $foo_length = SOME_LIST # although this can't happen : = list : = assigned to : === scalar : : See the

Re: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Curtis Poe
--- Timothy Kimball [EMAIL PROTECTED] wrote: Randal L. Schwartz wrote: : ... : Second might mean something like: : : $foo_length = SOME_LIST # although this can't happen : = list : = assigned to : === scalar : : See

Re: Extra INPUT TYPE=hidden NAME=.cgifields VALUE=ACTION ?

2001-06-21 Thread Timothy Kimball
Mel Matsuoka wrote: : Randal L. Schwartz wrote: : : ... : : Second might mean something like: : : : : $foo_length = SOME_LIST # although this can't happen : : = list : : = assigned to : : === scalar : : : : See the difference?

RE: Please remove

2001-06-21 Thread Ask Bjoern Hansen
On Wed, 20 Jun 2001 [EMAIL PROTECTED] wrote: I also have tried removal but I get this great little insulting remark that could only have been produced by a 'secret loyal order of Unix programmers' bit bombardier! Hi. This is the qmail-send program at onion.perl.org. I'm afraid I wasn't

Re: Please remove

2001-06-21 Thread Dave Young
D.J.B. is quite the character.. ;) I also have tried removal but I get this great little insulting remark that could only have been produced by a 'secret loyal order of Unix programmers' bit bombardier! Hi. This is the qmail-send program at onion.perl.org. I'm afraid I wasn't able to

Pooling of objects and session data

2001-06-21 Thread Rajeev Rumale
Hi, I need to know if there is any easiest way to keep session data or object accross the scripts. Basically I would like to pool Database connections so that Parrallel running scripts don't open multiple connection with the database. with regards Rajeev Rumale - Original Message -

Re: Telnet

2001-06-21 Thread Joel Divekar
Thanks Derek Regards Joel At 03:01 PM 6/20/2001 +0100, Derek Harding wrote: On Saturday 16 June 2001 07:28, Joel Divekar wrote: Hi Hey can we run KDE or Xwindows by telneting to Linux servers ??? Regards Not by telnet but certainly it is possible to run dumb terminals onto a Linux

Re: Telnet

2001-06-21 Thread Joel Divekar
Thanks SAWMaster (Not your real name I suppose) Will surely give it a try but I am looking for a free software Regards Joel At 09:25 AM 6/20/2001 -0500, SAWMaster wrote: Yes and no. You cannot do it with telnet, but you can get what you want by using an x-term client and setting up the

Re: Telnet

2001-06-21 Thread Joel Divekar
Thanks Brett Will surely download CygWin32... anyway I wanted to install it for Perl Regards Joel At 10:44 AM 6/20/2001 -0400, Brett W. McCoy wrote: On Wed, 20 Jun 2001, SAWMaster wrote: Yes and no. You cannot do it with telnet, but you can get what you want by using an x-term client

fastest method to check if a URL is alive

2001-06-21 Thread Drew Cohan
Hi, Could some kind soul please tell me why the following prints nothing for valid URLs? I'm trying to write a small, tight, and very fast script that'll check to see if a URL is alive in the least amount of time possible (and avoid using PING). I need to check thousands of URLs. It seems to

Re: compilation errors in win98

2001-06-21 Thread james crease
Thanks I had tried that already and doesn't seem to work at compile time:-( In message 00e401c0f9cc$02ee7340$0901a8c0@profit, Jos I. Boumans [EMAIL PROTECTED] writes try capturing the output: perl foo.pl outputfile.txt all that perl spits out should be in the outputfile.txt then regards,

Re: xml problem

2001-06-21 Thread Morgan
This script is exelent but I need the script to read the letters åäö and ÅÄÖ too. Cuz this is part of my launguage (Swedish) and those letters are in the articles. And I need to have the word between the HIT/HIT tags in too. Finaly I how do I enclose the article with ARTICLES/ARTICELS cuz Chas

tutorial on my/our/use/package/local

2001-06-21 Thread Me
There's plenty of existing doc, but in the name of TMTOWTDI... Asbestos suit donned. Criticisms welcome. -- If you are wondering about things like: use strict; my $foo; our $bar; local $baz; explicit package then this article might be of help. --

Re:MANPAGE

2001-06-21 Thread Govinderjit Dhinsa
How do I get access to the manpages please

Re: Re:MANPAGE

2001-06-21 Thread Me
How do I get access to the manpages please Depends on the system, and you may not be able to get access. One normal access method is to enter, at a shell prompt (command line): man foo to access the man page for foo. Perl has its own equivalent of manpages. To start, enter at a shell

RE: PERL PROGRAM HELP!

2001-06-21 Thread Aaron Craig
At 11:35 20.06.2001 +0100, Govinderjit Dhinsa wrote: Iv been givin this program to modify, but I can not astblish what some parts of the program are doing. From printf to } Can any body help please and run through it with me pls! open iscd,$ARGV[0] or die Cannot open

Re: Recursive subrutines

2001-06-21 Thread Aaron Craig
At 10:54 20.06.2001 +0200, Dalløkken, Espen wrote: I'm trying to wirte a recursive subroutine that recives an array, does some processing and then calls itself with a new array. The problem is that I never get to retrive the array after the subroutine has ran once. When it runs the second time it

file size

2001-06-21 Thread perl
Hi, I would like to know if with a perl script you can get the size of a file ? I need to get all the size of 250 files on 250 computers ... thanx

Re: PROGRAM!

2001-06-21 Thread Me
#!/usr/bin/perl -w use strict; means you can't just go introducing names willy nilly without telling perl where they come from. which in turn means... while () { @fields = split /*/; you can't do this!. oops. should be my @fields = split /*/;

Re: file size

2001-06-21 Thread Me
-s as in: perl -e 'print $_: . -s . \n for (glob (*.*))' Hi, I would like to know if with a perl script you can get the size of a file ? I need to get all the size of 250 files on 250 computers ... thanx

Re: compilation errors in win98

2001-06-21 Thread james crease
In message [EMAIL PROTECTED], Sally [EMAIL PROTECTED] writes Why don't you work on the ones you can see, then the list will shrink, and you'll get rid of the errors eventually. I know that's not the point but it is a solution. This is not I think likely to help as most of the errors are

Re: file size

2001-06-21 Thread victor
use the stat command. [EMAIL PROTECTED] wrote: Hi, I would like to know if with a perl script you can get the size of a file ? I need to get all the size of 250 files on 250 computers ... thanx

RE: Please remove

2001-06-21 Thread John Pimentel
I'm not sure how HE tried to remove himself, but if you send an email to the address provided in the confirmation email [EMAIL PROTECTED] the onion.perl.org mail server complains and sends it back. I tried it - following the instructions EXACTLY as they were written. I assume the ability to

Re: Detecting NT eol (^M) characters

2001-06-21 Thread Chas Owens
\n in Perl is magical. It changes its value based on the OS. On Unix boxen it is equal to LF, on Macs it is equal to CR, and on DOS based machines it is equal to CRLF. If you are looking for the CR and only the CR your best bet is to use \015. On 21 Jun 2001 07:17:04 -0400, Jeanne Riley

Re[2]: compilation errors in win98

2001-06-21 Thread Tim Musson
Hey james, Can you change the Properties of the command window? Right click on the blue bar at the top, Properties, then the Layout tab. I typically set it to: Screen Buffer Size: Width 100 Height 300 Window Size: Width80 Height 50 This should work on 98. I run Win2k, but it also

Re: Re[2]: if statement

2001-06-21 Thread Chas Owens
snip href=perldoc perlop Symbolic Unary Operators Unary ! performs logical negation, i.e., not. See also not for a lower precedence version of this. /snip Most of the line noise logical operators have an equivalent English operator. These English operators (in general) have a

Re: Last page

2001-06-21 Thread Jos Boumans
Assuming you'll utilise the CGI module, this would work: my $q = new CGI; my $calling_page = $q-referer(); hth, Jos Boumans Stéphane JEAN BAPTISTE wrote: How can I get the URL which was calling my script (like document.referrer in Javascript) tks

Re: Detecting NT eol (^M) characters

2001-06-21 Thread Brett W. McCoy
On Thu, 21 Jun 2001, Jeanne Riley wrote: I am attempting to write my 1st Perl script. I have an install of ClearCase 4.1 which has Perl embedded in it. I need to write a Perl script (trigger) that if anyone attempts to check in a file with NT eol character the check in will be blocked.

Re: Last page - That's OK

2001-06-21 Thread Stéphane JEAN BAPTISTE
It was all I need Thank you Stéphane JEAN BAPTISTE a écrit : How can I get the URL which was calling my script (like document.referrer in Javascript) tks

SUB ?

2001-06-21 Thread EDonnelly
Hi All, Can you tell me what this sub is. Is it sub routine ? Regards, Elaine. local(@acc_fields) = @_; return(-810) if ( $acc_fields[0] == 0 || $acc_fields[0] eq '' ); return(-811) if ( $acc_fields[1] eq ); return(-812) if ( $acc_fields[2] eq ); return(-813) if (

Perl DB Question again

2001-06-21 Thread Prabhu, Vrunda P (UMC-Student)
Victor had graciously answered some of my questions earlier about using DB_File in a perl CGI. I am now wondering about the following: I have the following code: ** $filename=./mockalias.db; tie %ALIAS, 'DB_File', $filename, O_RDWR|O_CREAT, 0644,

SUB ?

2001-06-21 Thread EDonnelly
If it is sub routine, What does this mean ? - Forwarded by Elaine Donnelly/Saturn on 21/06/01 14:49 - [EMAIL PROTECTED]

Re: compilation errors in win98

2001-06-21 Thread james crease
In message 993124108.25145.2.camel@cowens, Chas Owens [EMAIL PROTECTED] writes The problem is that the error messages are going to stderr instead of stdout. The standard DOS shell (command.com or cmd.exe depending on your system) doesn't understand how to capture stderr. The solution is to get

Re: SUB ?

2001-06-21 Thread Chas Owens
Which one? I count four. On 21 Jun 2001 15:02:52 +0100, [EMAIL PROTECTED] wrote: If it is sub routine, What does this mean ? - Forwarded by Elaine Donnelly/Saturn on 21/06/01 14:49 -

Re: to delete a file

2001-06-21 Thread victor
try the unlink command. Stéphane JEAN BAPTISTE wrote: How can I delete a file ? thanks

RE: to delete a file

2001-06-21 Thread Yacketta, Ronald
unix: rm filename winblows: del filename oh wait, do you mean in perl ;) (wise a$$ arent I?) perldoc -f unlink -Original Message- From: Stéphane JEAN BAPTISTE [mailto:[EMAIL PROTECTED]] Sent: Thursday, June 21, 2001 10:03 AM To: PERL Subject: to delete a file How can I

Re: to delete a file

2001-06-21 Thread n6tadam
Hi, Usually, one uses the following command (from the shell prompt) rm /path/to/file/filename To supress the confirmation message, use: rm -f /path/to/file/filename To delete recursively (i.e. a directory), and make it verbose to the screen: rm -rfv /path/to/directory Does that help. Of

Re: SUB ?

2001-06-21 Thread EDonnelly
Does that mean that it will run 4 different sub routines ? Chas Owens

Re: SUB ?

2001-06-21 Thread Chris Hedemark
Yes, sub denotes a subroutine. Syntax: sub name { command; command; command; } You call it like this: name(arg1,arg2); I highly recommend picking up a copy of Learning Perl which explains this in great detail. - Original Message - From: [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent:

Re: to delete a file

2001-06-21 Thread Kevin Meltzer
On Thu, Jun 21, 2001 at 03:04:21PM +0100, n6tadam ([EMAIL PROTECTED]) spew-ed forth: Hi, [snip] Of course, from a perl script, you can either use: system(/bin/rm -f /path/to/filename); or `rm -f filename` Don't do that. Just use unlink() perldoc -f unlink Cheers, Kevin --

Re: to delete a file - That's OK

2001-06-21 Thread Stéphane JEAN BAPTISTE
It's allright! thank you Stéphane JEAN BAPTISTE a écrit : How can I delete a file ? thanks

Re: to delete a file

2001-06-21 Thread Nigel Wetters
To delete a file: unlink($filename) or die can't delete $filename:$!\n; To delete lots of files: unlink(@filenames) == @filenames or die couldn't unlink all of @filenames: $!\n; To delete a folder: use File::Path; rmtree($directory); Stéphane JEAN BAPTISTE [EMAIL PROTECTED] 06/21/01 03:03pm

Re: SUB ?

2001-06-21 Thread Chas Owens
No, subroutines only get run if you explictitly run them: code #!/usr/bin/perl -w use strict; runme(); #run the runme subroutine sub runme { print You ran me!\n; } sub do_not_run_me { print Why did you run me?\n; } /code Based on the fact that the file ends with 1; I am

RE: xml problem

2001-06-21 Thread Richard_Cox
Chas Owens [mailto:[EMAIL PROTECTED]] wrote: On 21 Jun 2001 10:38:08 +0200, Morgan wrote: This script is exelent but I need the script to read the letters åäö and ÅÄÖ too. Cuz this is part of my launguage (Swedish) and those letters are in the articles. I am working on this, I don't

Re: exec()

2001-06-21 Thread Paul
--- Yacketta, Ronald [EMAIL PROTECTED] wrote: I am running the following (Thanxs to Paul for his skeleton code) exec ( 'egrep'. -c, $lookFor, @{$LOGS[($_ -1)]} ) You're quite welcome, but why exec egrep? Ah, I may have misled you with that code. You probably don't need the exec at all. Just

RE: xml problem

2001-06-21 Thread Chas Owens
snip / Try [...]encoding='ISO-8859-4'[...] ISO-8859-1 (aka Latin-1) coveres W. Europe, ISO-8859-4 is the specific Scandinavian character set (almost, but not quite, the same as -1). If this does not work, have a look at using UTF-8 (but this means those accented characters will

Re: to delete a file

2001-06-21 Thread Chris Hedemark
#!/usr/bin/perl # # Name:unlinkdemo.pl # Author: Chris Hedemark [EMAIL PROTECTED] # Purpose: Demonstrate use of the unlink function. if (!@ARGV) { die No arguments!\n; } for ($i = 0; $i @ARGV.; ++$i) { if (-e $ARGV[$i]) { unlink ($ARGV[$i]); } else { print File $ARGV[$i]

RTF to HTML or text conversion

2001-06-21 Thread Jonathan Macpherson
Hi; Im trying to write a perl script that will pull newspaper stories out of a sybase database and post them on the web. I can connect to sybase, pull stories, but they are in Rich Text Format. I would like to convert the RTF to text or html. Could anyone point me in the right direction ?

Re: to delete a file

2001-06-21 Thread Chris Hedemark
This will work on UNIX but I recommend against this because it is not portable to other platforms, and there inefficiency in this in that it is not native perl. I recommend using the unlink command in perl which will be portable across platforms and for a large number of files/servers it will

Re: Last page

2001-06-21 Thread Zhe Hong
The URL which was calling your script is stored in the variable $ENV{'HTTP_REFERER'} . note: referrer spelt as referer and not referrer.

use of require causing name space problems?

2001-06-21 Thread Rodney Holm
I have a few functions that are common to many different perl applications. All of these functions live in one file. I have many perl programs that run from cron that make use of these functions. So, in each of these programs I use require to gain access to these functions. Example: doit.pl

Re: RTF to HTML or text conversion

2001-06-21 Thread Me
http://search.cpan.org/ Im trying to write a perl script that will pull newspaper stories out of a sybase database and post them on the web. I can connect to sybase, pull stories, but they are in Rich Text Format. I would like to convert the RTF to text or html. Could anyone point me in the

Terminal control on Windows NT

2001-06-21 Thread Nigel Wetters
I want to do this: use POSIX qw(:termios_h); $term = POSIX::Termios-new; $term-getattr(fileno(STDIN)); # do some terminal manipulation here However, I get the error message on Windows NT: POSIX::termios not implemented on this architecure I have two questions: 1. Is there _any_ way to

RE: Terminal control on Windows NT

2001-06-21 Thread John Edwards
use Term::ReadKey; print Please enter password: ; ReadMode('noecho'); $password = ReadLine(0); ReadMode('restore'); chomp ($password); print \n; print $password\n; -Original Message- From: Nigel Wetters [mailto:[EMAIL PROTECTED]] Sent: 21 June 2001 16:16 To: [EMAIL PROTECTED] Subject:

Re: tutorial on my/our/use/package/local

2001-06-21 Thread Randal L. Schwartz
Jeff == Jeff 'japhy' Pinyan [EMAIL PROTECTED] writes: Jeff Damian dropped the bomb at YAPC. You'll be able to access the padlist, Jeff using a mechanism like C$MY.foo. Ah, that's what happens when you spend a week at sea with Tim Bunce on a Geek Cruise (www.geekcruises.com) instead of being

Re[2]: compilation errors in win98

2001-06-21 Thread Tim Musson
Hey james, Thursday, June 21, 2001, 9:26:34 AM, you wrote: jc The version of DOS I have on win98SE doesn't allow for a scroll jc bar as suggested by one comment nor does it have a layout tab to jc set the size of the window although it does allow a set to a jc maximum of 50 lines. Are you

RE: use of require causing name space problems?

2001-06-21 Thread Rodney Holm
Does anyone know why perl behaves like this? It seems to me that since the scripts are running as seperate processes, there should not be a problem. The only information Ive found on the subject is this: require - the file being required inserts the subroutine names into a package (

=

2001-06-21 Thread Nick Transier
I have written some OO perl and I have a problem that I just realized, when you set an object = to another object, they become irreversibly linked and all operations on one or the other causes changes in both. If I am trying to simply initialize the object and not link them, how do I get

Re: use of require causing name space problems?

2001-06-21 Thread Me
Ok, I entirely retract my post to which this is a reply. Hey, I've been up all night. If the scripts are running as separate processes, then, well, I don't know. Does anyone know why perl behaves like this? [see earlier posts in thread]

Regex Problem

2001-06-21 Thread Jack Lauman
I get the following results when running the perl script below. For some reason I get (3) lines that don't match the regex criteria before it reaches the first line that has data, and one additional line after the script completes. Is there a way to not write the line if the varaiable $cur_sym

RE: Regex Problem

2001-06-21 Thread John Edwards
if ($cur_sym) { printf OUTFILE %s\,%s\,%s\,%s\,%s\,%s\,%s\n,$date, $time, $tz, $cur_sym, $cur_desc, $usd_unit, $units_usd; } -Original Message- From: Jack Lauman [mailto:[EMAIL PROTECTED]] Sent: 21 June 2001 17:15 To: [EMAIL PROTECTED] Subject: Regex Problem I get the following

Re: =

2001-06-21 Thread Jeff 'japhy' Pinyan
On Jun 21, Nick Transier said: I have written some OO perl and I have a problem that I just realized, when you set an object = to another object, they become irreversibly linked and all operations on one or the other causes changes in both. If I am trying to simply initialize the object and

RE: =

2001-06-21 Thread Nick Transier
Isn't == a logical operator? I am not trying to compare the two objects. From: Sally [EMAIL PROTECTED] To: Nick Transier [EMAIL PROTECTED] Subject: RE: = Date: Thu, 21 Jun 2001 17:18:47 +0100 You should use == instead of = -Original Message- From: Nick Transier [mailto:[EMAIL

Re: Perl DB Question again

2001-06-21 Thread Michael Fowler
On Thu, Jun 21, 2001 at 08:48:08AM -0500, Prabhu, Vrunda P (UMC-Student) wrote: I have the following code: [snip] open Fin, mockalias; Always check your open calls: open Fin, mockalias or die(Unable to open file \mockalias\: \l$!.\n); [snip] My question is the following: When

Re: =

2001-06-21 Thread Brett W. McCoy
On Thu, 21 Jun 2001, Nick Transier wrote: I have written some OO perl and I have a problem that I just realized, when you set an object = to another object, they become irreversibly linked and all operations on one or the other causes changes in both. If I am trying to simply initialize the

Advice for Perl Class

2001-06-21 Thread dave hoover
I began learning Perl in November of 2000. I've learned a lot in a short amount of time and I feel like I've got a good understanding of Perl fundamentals (I just finished reading Effective Perl Programming...great book). Anyway, at my job I have the opportunity to use some training money to

Re: Terminal control on Windows NT

2001-06-21 Thread Brett W. McCoy
On Thu, 21 Jun 2001, Nigel Wetters wrote: use POSIX qw(:termios_h); $term = POSIX::Termios-new; $term-getattr(fileno(STDIN)); # do some terminal manipulation here However, I get the error message on Windows NT: POSIX::termios not implemented on this architecure I have two

Cloning

2001-06-21 Thread Nick Transier
Ok, so I see the way around the = problem with cloning, however, there is a clone module on CPAN, but I have no idea how to install it using win2k. Any ideas? Thanks, -Nick _ Get your FREE download of MSN Explorer at

Re: tutorial on my/our/use/package/local

2001-06-21 Thread Me
Brutal critique enclosed... beware, I get right to the point. :) Hmm, I enjoyed it, so I'm thinking I must be more SM oriented than I thought... Me # $_ is in main. $_ is always in main, even if the current package is something else. Yes. I spent some time considering where this was

regex headache

2001-06-21 Thread Yacketta, Ronald
Folks, I have been looking for a way to search for two strings in a line at the command line I would Communication $grepTMPFILE | grep failure | wc -l how would this be converted into perl/regex? I have part of it right now (Thanxs to others on the list) foreach (@output) { foreach my

Re: fastest method to check if a URL is alive

2001-06-21 Thread Bradford Ritchie
I tried your code and got it to work by inserting a chomp; in your while loop. I don't understand chomp/chop well enough to figure out how to imbed it within the print line, though. Give it a shot if you think it will run faster that way. -- Brad - Original Message - From: Drew

Re: Cloning

2001-06-21 Thread Jos I. Boumans
if you have activestate's perl distro, try running 'ppm' and search for 'storable' then just 'install storable' (or whatever it's exact name is) and you're good to go if you did it anyway else, you'll need to grab the tarball off cpan and install like described in the readme hth, Jos Boumans

How do you create a Hyperlink field in an MS Access table?

2001-06-21 Thread Adam Dudsic
I'm using Perl DBI to create a table in an MS Access database. No problem with that. However, I can't figure out how to create a field in that table whose data type is Hyperlink. In the course of investigating the problem, I manually created a table in which one of the fields was set to the

How do you create a Hyperlink field in an MS Access table?

2001-06-21 Thread Adam Dudsic
I'm using Perl DBI to create a table in an MS Access database. No problem with that. However, I can't figure out how to create a field in that table whose data type is Hyperlink. In the course of investigating the problem, I manually created a table in which one of the fields was set to the

Re: =

2001-06-21 Thread Chas Owens
On 21 Jun 2001 12:40:07 -0400, Brett W. McCoy wrote: snip / In C++, you can overload the = operator to use the copy constructor. I don't remember if in Perl you can overload = snip / use overload = = \clone; Perl also does automagic operator overloading. If you overload - it automagicly

One last question...

2001-06-21 Thread Jack Lauman
I get the following from 'grep CAD currency.csv' created from the script below. If the file has more than one e-mail message in it (this one does) how can I get it to return the correct date along with the currency rates data (which are correct)? 2001-06-14,14:16:23,PDT,CAD,Canada

Re: compilation errors in win98

2001-06-21 Thread Aaron Craig
At 21:49 20.06.2001 +0100, james crease wrote: I have a perl script which generates many compilation errors which scroll off the DOS window perl is running in. How do I capture (or recover) the lines that have scrolled away? -- james crease Use EditPlus2 as your editor. You can capture perl

Re: Cloning

2001-06-21 Thread Brett W. McCoy
On Thu, 21 Jun 2001, Nick Transier wrote: Ok, so I see the way around the = problem with cloning, however, there is a clone module on CPAN, but I have no idea how to install it using win2k. Any ideas? If it's not available as a PPM (for ActiveState), you will need to install as source, which

Re: tutorial on my/our/use/package/local

2001-06-21 Thread Chas Owens
I just listened to the mp3 of it this morning, fascinating stuff. It almost makes me sad I started learning Perl now and not next year. http://www.crystalflame.net/keynote.mp3 slide show: http://www.yetanother.org/damian/Perl6/YAPC_talk.pdf On 21 Jun 2001 08:32:49 -0700, Randal L. Schwartz

Re: Limiting String Length

2001-06-21 Thread Jeff 'japhy' Pinyan
On Jun 21, Chuck Ivy said: Now, looking up the substring function, it looks like if the original string were less than the size of my substring, it would pad my variable until it was 4096 characters. Would a regex be better? Matching for up to 4096 characters and replacing the string with

  1   2   >