Hi Sara,
I think ALgorithm::Diff is what you are looking for.
http://search.cpan.org/dist/Algorithm-Diff/
-Prad
-Original Message-
From: Sara [mailto:[EMAIL PROTECTED]
Sent: Tue 3/2/2004 5:08 AM
To: beginners-cgi
Cc:
Subject:Comparing text text::diff
I asked a
B. Fongo wrote:
I wander if here a way to create thumbnails using Perl?
I want to implement functionality for my shop program to create a
thumbnail of product pictures.
A good instance of it may be that of eBay. Users can upload a picture of
any dimension for their listing. EBay will
NAME
beginners-faq - FAQ for the beginners-cgi mailing list
1 - Administriva
1.1 - I'm not subscribed - how do I subscribe?
Send mail to [EMAIL PROTECTED]
You can also specify your subscription email address by sending email to
(assuming [EMAIL PROTECTED] is your email
Is MIME::Lite only capable of sending email attachments present on your server?
What If I want the users to give ability to attach files from their hard drives from a
form input.
Is there any other module for it?
Thanks,
Sara.
On Mon, 8 Mar 2004 12:12:20 +0500, Sara wrote:
Is MIME::Lite only capable of sending email attachments present on
your server?
Yes and No. You must be able to have a path to where the file is stored. This can even
be a network path, but not an http/ftp path.
What If I want the users to give
Alexander Douglas wrote:
Hello
I am new to perl , is there any good IDE to develop simple perl forms with
firebird database which is a no brainer.
Please advice
Mohammed
SciTE is a great little editor. Works on Windows and Linux equally.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For
WC -Sx- Jones said:
QUESTION - Can anyone tell me the trick to get __DATA__ to read the
preceeding program code?
seek DATA, 0, 0;
--
Paul Johnson - [EMAIL PROTECTED]
http://www.pjcj.net
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
R. Joseph Newton wrote:
I just checked, and this is special magic with the __END__ and __DATA__ tags.
For instance:
Greetings! E:\d_drive\perlStuffperl -w
while (DATA) {
print;
}
__JABBERWOCK__
Hello
Does not work, as we can see.
If you want __JABBERWOCK__ to work then use
I must chime in.
I've been learning perl for pretty much exactly a year now. I Still
feel like a newbie.
I haven't yet got to the chapters on Prototypes and Inheritance, I've
read about the concepts but not yet applied them.
I've been using subroutines and modules quite a bit and references
Hi All,
Is there anyway to get the file name associated with the file handler?
Thanks
Regards
Guruguhan
EACoE, India.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/ http://learn.perl.org/first-response
Guruguhan N wrote:
Hi All,
Hello,
Is there anyway to get the file name associated with the file handler?
You can do that on Linux. Which OS are you running?
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL
Bill,
Would it not be better to post (copy) this message and the following postings to
perl.tips oriented for beginners (like me)
http://www.nntp.perl.org/group/perl.tips
Later it is going to be much easier to search perl.tips with 8 messages posted up to
date then go through 61314
Hi ppl,
In an HP/GL2 file, there is a command called SP (select pen) which is
associated to a pen number from 1 to 64. I have to parse the file and
insert a command after each select pen command.
Example :
10652PUPD515,10652PUPD515,2536PUSP61PU57531,8270PDPA57
Hi ppl,
In an HP/GL2 file, there is a command called SP (select pen) which is
associated to a pen number from 1 to 64. I have to parse the file and
insert a command after each select pen command.
Example :
10652PUPD515,10652PUPD515,2536PUSP61PU57531,8270PDPA57
Serguei Krivov wrote:
Bill,
Would it not be better to post (copy) this message and the following postings to perl.tips oriented for beginners (like me)
http://www.nntp.perl.org/group/perl.tips
Later it is going to be much easier to search perl.tips with 8 messages posted up to date then go
Hemond, Steve wrote:
Example :
10652PUPD515,10652PUPD515,2536PUSP61PU57531,8270PDPA57
to :
10652PUPD515,10652PUPD515,2536PUSP61;NEW_COMMAND;PU57531,8270PDPA57
My actual way of doing it is :
On 3/8/2004 8:35 AM, Hemond, Steve wrote:
Hi ppl,
In an HP/GL2 file, there is a command called SP (select pen) which is
associated to a pen number from 1 to 64. I have to parse the file and
insert a command after each select pen command.
Example :
Thanks to everybody for replying and for the good explanations. :-)
Steve Hemond
Programmeur Analyste / Analyst Programmer
Smurfit-Stone, Ressources Forestières
La Tuque, P.Q.
Tel.: (819) 676-8100 X2833
[EMAIL PROTECTED]
-Original Message-
From: Randy W. Sims [mailto:[EMAIL
On Mar 8, 2004, at 7:49 AM, WC -Sx- Jones wrote:
I am both pleased and annoyed that I have gotten very little flames
over my How To posting -- not that I want to annoy people, I don't; I
am simply trying to condense certain questions and thoughts that I
myself had when I was starting out so
On Mar 7, 2004, at 7:07 PM, Stuart White wrote:
Ah, so there is a use for the for which is like
foreach other than a shortcut. Can I do that with
foreach? I see that what you are describing with the
foreach loops above is what was going on with my
nested foreach loops before.
I believe this is
I have the code below in a module I'm writing (Complete module is at
www.thepierianspring.org/CPAN-Metadata-0.00_01.tar.gz). The three
methods _mk_*_accessor are nearly identical. I would like to simplify
this code, but I want to avoid a giant eval since it makes code more
difficult to
From: Jim Canfield [EMAIL PROTECTED]
I'm having trouble creating an 2 dimensional array that contains the
values of other smaller arrays. For example:
foreach (@files) {
#...Get values
@smallarray = ('$value1',$value2','$value3');
Whange the line above to
my
Randy W. Sims wrote:
I have the code below in a module I'm writing (Complete module is at
www.thepierianspring.org/CPAN-Metadata-0.00_01.tar.gz). The three
methods _mk_*_accessor are nearly identical. I would like to simplify
this code, but I want to avoid a giant eval since it makes code more
I would like comments on:
/[EMAIL PROTECTED](?:\w){2,})/ REJECT Invalid address format.
( to stop BS like this: [EMAIL PROTECTED] )
I am working on a living postfix server which reconfigures itself to
account for spamming/virus patterns. The above is supposed to block any
address which
NAME
beginners-faq - FAQ for the beginners mailing list
1 - Administriva
1.1 - I'm not subscribed - how do I subscribe?
Send mail to [EMAIL PROTECTED]
You can also specify your subscription email address by sending email to
(assuming [EMAIL PROTECTED] is your email address):
I have implemented Perl 5.8 from ActiveState. Now I need the PPM Module for
DB:Oracle. I couldn't find it on ActiveState's web site. Where can I find this
module?
Thanks,
Ken Janusz, CPIM
--- James Edward Gray II [EMAIL PROTECTED]
wrote:
On Mar 7, 2004, at 7:07 PM, Stuart White wrote:
Ah, so there is a use for the for which is like
foreach other than a shortcut. Can I do that with
foreach? I see that what you are describing with
the
foreach loops above is what was
On 03/08/04 12:36, KENNETH JANUSZ wrote:
I have implemented Perl 5.8 from ActiveState. Now I need the PPM Module for DB:Oracle. I couldn't find it on ActiveState's web site. Where can I find this module?
I don't know if you'll be able to find a ppm for that as I think it
needs to be linked
I'm reading in lines of text, and extracting the
relevant parts of it. These relevant parts are then
being pushed onto an array. My trouble is that these
parts are a maximum of 24 unique names. However, when
pushed onto the array, there is no mechanism for
comparison where the repeated names
I would like comments on:
/[EMAIL PROTECTED](?:\w){2,})/ REJECT Invalid address format.
( to stop BS like this: [EMAIL PROTECTED] )
I am working on a living postfix server which reconfigures itself to
account for spamming/virus patterns. The above is supposed to block any
Stuart White wrote:
I'm reading in lines of text, and extracting the
relevant parts of it. These relevant parts are then
being pushed onto an array. My trouble is that these
parts are a maximum of 24 unique names. However, when
pushed onto the array, there is no mechanism for
comparison
From: Stefan Lubitz [EMAIL PROTECTED]
I have the problem that after 10 minutes the Screensaver of my PC is
getting activated. I am not able to change it, because it is a W2k
Domain policy. Now I thought, that I could write a small Perl Script,
which is turning on and off the Scrolllock Key,
From: WC -Sx- Jones [EMAIL PROTECTED]
Mark Martin wrote:
Hi,
I've got a web form that allows a user to browse to an excel file on
their computer and input it and the year as parameters to run a perl
script
FORM :
input type=file value=excel name=file size=15
How do you know
In the end, I want @SAN to have all the unique
names
within the file. Any ideas?
You just described a Hash. Use %hash and then
either uppercase or lowercase the the incoming key.
YOu could then add a count to the Hash so you know
you are looking at all things or not. The keys for
Stuart White wrote:
In the end, I want @SAN to have all the unique names
within the file. Any ideas?
You just described a Hash. Use %hash and then
either uppercase or lowercase the the incoming key.
YOu could then add a count to the Hash so you know
you are looking at all things or
Hi, is there a good way to tell how much memory a given data structure is
consuming? I realize that there are issues in using this number to
determine runtime memory requirements (like the fact that, in some
circumstances, a running Perl process does not give back allocated memory
to the
Hello All,
I am using Perl to launch installer written in Shell script on Solaris. I am
supplying the arguments for all the prompts made by the installer from Perl,
such as path, port number etc., The installer displays a copyright page that
has multiple pages when it is launched and then prompts
On Mar 8, 2004, at 1:24 PM, Stuart White wrote:
If I had a hash, I'd have to have a key and a value
though. I'm just looking for one or the other. I
suppose I could have key value pairs in the %SAN hash
like so:
Perl hashes are pretty versatile. As Wags was saying, just stick each
item in the
On Mar 8, 2004, at 1:37 PM, James Edward Gray II wrote:
my @words = qw(dog cat dog lizard dog wombat dog);
my %seen;
foreach (@words) {
$seen{$_}++;
}
my @words = keys %seen;
Egad, I'm dumb today, drop the my in the above line. Sorry.
print @words\n; # only prints one dog
James
--
To
On Mon, Mar 08, 2004 at 01:20:26PM -0600, Michael C. Davis wrote:
Hi, is there a good way to tell how much memory a given data structure is
consuming? I realize that there are issues in using this number to
determine runtime memory requirements (like the fact that, in some
circumstances, a
Rajesh Dorairajan wrote:
cat copyright | more
Useless use of cat award.
Wonder why didnt the author use more copyright or less copyright?
I am trying to edit the script and modify it as:
cat copyright
I am trying the following command from perl:
system(perl -p -i.bak -e \s/cat copyright |
Hi,
Can anyone explain to me why I would get a perl error in one web browser but
not in any others?
All I¹m doing is taking an email address from a form, feeding it to a
validation sub that untaints it, then using it with the f option to
sendmail. It works fine in Mozilla browsers on both Mac
At 08:57 PM 3/8/04 +0100, Paul Johnson wrote:
On Mon, Mar 08, 2004 at 01:20:26PM -0600, Michael C. Davis wrote:
Hi, is there a good way to tell how much memory a given data structure is
consuming? I realize that there are issues in using this number to
determine runtime memory requirements
--- Wagner, David --- Senior Programmer Analyst ---
WGO [EMAIL PROTECTED] wrote:
Stuart White wrote:
In the end, I want @SAN to have all the unique
names
within the file. Any ideas?
You just described a Hash. Use %hash and then
either uppercase or lowercase the the incoming
key.
--- James Edward Gray II [EMAIL PROTECTED]
wrote:
On Mar 8, 2004, at 1:24 PM, Stuart White wrote:
If I had a hash, I'd have to have a key and a
value
though. I'm just looking for one or the other. I
suppose I could have key value pairs in the %SAN
hash
like so:
Perl hashes are
Randy W. Sims wrote:
On 3/8/2004 8:35 AM, Hemond, Steve wrote:
In an HP/GL2 file, there is a command called SP (select pen) which is
associated to a pen number from 1 to 64. I have to parse the file and
insert a command after each select pen command.
Example :
On Mar 8, 2004, at 4:19 PM, Stuart White wrote:
Conceptually, what you say the result is, is what I
want, thanks. When I read it though, without the
comment, I'd guess that the program would pair those
words like so:
dog:cat, dog:lizard, dog:wombat
with dog:lizard overwriting dog:cat, and
Stuart White wrote:
I'm reading in lines of text, and extracting the
relevant parts of it. These relevant parts are then
being pushed onto an array. My trouble is that these
parts are a maximum of 24 unique names. However, when
pushed onto the array, there is no mechanism for
comparison
Wc -Sx- Jones wrote:
Michael C. Davis wrote:
Hi, is there a good way to tell how much memory a given data structure is
consuming? I realize that there are issues in using this number to
determine runtime memory requirements (like the fact that, in some
circumstances, a running Perl
On Sun, Mar 07, 2004 at 12:41:18AM +, Angie Ahl wrote:
However I get them now. And for any other newbies out there... go look
up references right now... really.
In my case it was references and lists-vs-arrays (and how hashes fit
into all this) that caught me. The moment they both had
Rajesh Dorairajan wrote:
Hello All,
Hello,
I am using Perl to launch installer written in Shell script on Solaris. I am
supplying the arguments for all the prompts made by the installer from Perl,
such as path, port number etc., The installer displays a copyright page that
has multiple
-Original Message-
From: WC -Sx- Jones [mailto:[EMAIL PROTECTED]
Sent: Tuesday, 9 March 2004 6:58 AM
To: Rajesh Dorairajan
Cc: Perl-Beginners (E-mail)
Subject: Re: Modifying text in a shell script from Perl
Rajesh Dorairajan wrote:
cat copyright | more
Useless use of cat
This is where the work gets done, yes. In English
it reads, for every
word in the array, add one to the corresponding hash
value under that
key. That will give you a hash with keys for all
the words. Their
values will be the number of times that word
appeared in the array.
That's
If you want the teams and players to be unique you
should probably use a
hash of hashes (HoH):
Eventually, I think I'll use that, but not yet. Baby
steps. :) thanks.
my %stats;
while ( STATS ) {
my ( $t, $p ) = /\[($team)\] ($player)/ or next;
$stats{ $t }{ $p } = ();
Erik Rieselbach wrote:
³Insecure dependency in piped open while running with -T switch² at the line
where I open a pipe to sendmail.
This is what your server logs say or what is displayed in the browser
window? You sure it isn't originating from sendmail? The -t option:
sendmail
-t
John W. Krahn wrote:
length() evaluates its argument in scalar context and an array in scalar
context returns the number of elements in the array so you are getting
the length of the number of elements.
John
I love you ma :)
(With apologises to Animal House.)
@array = 1 .. 99;
do {
This worked perfectly! Thanks.
--- James Edward Gray II [EMAIL PROTECTED]
wrote:
On Mar 8, 2004, at 4:19 PM, Stuart White wrote:
Conceptually, what you say the result is, is what
I
want, thanks. When I read it though, without the
comment, I'd guess that the program would pair
those
At 09:56 AM 3/8/2004, Randy W. Sims wrote:
On 03/08/04 12:36, KENNETH JANUSZ wrote:
I have implemented Perl 5.8 from ActiveState. Now I need the PPM Module
for DB:Oracle. I couldn't find it on ActiveState's web site. Where can
I find this module?
This from Jeff Ulwin, who maintains a site
Hey all.
I need to trace / debug a CGI script which basically involves lots of
'print DEBUG_FH'.
I noticed the existence of the Devel::Trace module which allows you to
trace your
perl script to STDERR
eg,
perl -d:Trace myprog.pl
However, since my program is a CGI, I've come across a
Here's a line:
(10:18) [PHX] Stoudemire Turnover: Lost Ball (1 TO)
Steal: Jackson (1 ST)
I want to match PHX Stoudemire Steal: Jackson
these are my patterns:
my $steal = 'Steal:\s';
my $team = '\w{3}';
my $player = '\w+';
this is my regex:
if ($_ =~ /\[($team)\] ($player).($steal)/)
I tried
James Edward Gray II wrote:
On Feb 28, 2004, at 1:24 PM, R. Joseph Newton wrote:
Rob Dixon wrote:
David Le Blanc wrote:
Actually, I'd better apologise for calling RPC::p*
secure, simple, or well documented, before anyone comes
at me with a knife :-(
You won't feel a thing. Trust me: I'm an
Andrew Gaffney wrote:
[snip]
Really, I'm the only user of my code. I don't expect to get replaced
anytime soon as my boss also doubles as my father ;) Besides, I
certaintly don't want to make things easier for my replacement (if there
ever is one).
Sorry for the old post, but this last
I want to write an online game...
I need a to make a logon page and a new person page.
I think I can do this with little help...
however on the map...
Do I keep one big file with all the info..
of several little files..
which is better?
Thanks
Lou
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
Wiggins d'Anconia wrote:
Andrew Gaffney wrote:
[snip]
Really, I'm the only user of my code. I don't expect to get replaced
anytime soon as my boss also doubles as my father ;) Besides, I
certaintly don't want to make things easier for my replacement (if
there ever is one).
Sorry for the old
On Mon, Mar 08, 2004 at 09:53:26PM -0500, Luinrandir Hernsen wrote:
Do I keep one big file with all the info..
of several little files..
which is better?
I assume you are referring to perl CGI or something are you? If so, I'd
suggest looking into using a database and designing an appropriate
Bob Showalter wrote:
Price, Jason wrote:
Hmm...I guess that's the majority of the script. :) I can follow
what it does, but I'm not entirely sure why it does it.
Also, is there any way I can self-contain the output from each child
process?
You can use a separate pipe for each child, but now
Andrew Gaffney [EMAIL PROTECTED] wrote:
:
: I'm currently going through and cleaning up all my code
: and moving all common code to my module.
Get used to doing it. In about a year you'll wonder
why you did it that way and how you did anything with
such terrible programming.
:)
Charles
Charles K. Clarkson wrote:
Andrew Gaffney [EMAIL PROTECTED] wrote:
:
: I'm currently going through and cleaning up all my code
: and moving all common code to my module.
Get used to doing it. In about a year you'll wonder
why you did it that way and how you did anything with
such terrible
WC -Sx- Jones wrote:
Serguei Krivov wrote:
Bill,
Would it not be better to post (copy) this message and the following postings to
perl.tips oriented for beginners (like me)
http://www.nntp.perl.org/group/perl.tips
Later it is going to be much easier to search perl.tips with 8
Stuart White wrote:
In the end, I want @SAN to have all the unique
names
within the file. Any ideas?
You just described a Hash. Use %hash and then
either uppercase or lowercase the the incoming key.
YOu could then add a count to the Hash so you know
you are looking at all
WC -Sx- Jones wrote:
Michael C. Davis wrote:
Hi, is there a good way to tell how much memory a given data structure is
consuming? I realize that there are issues in using this number to
determine runtime memory requirements (like the fact that, in some
circumstances, a running Perl
Hi,all
I use samba and LDAP to build a PDC, but samba build NT Password via
hash4, and have a program mkntpwd to generate crypted password, does
perl has any module or function to do this?
--
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Michael C. Davis wrote:
Hi, is there a good way to tell how much memory a given data structure is
consuming? I realize that there are issues in using this number to
determine runtime memory requirements (like the fact that, in some
circumstances, a running Perl process does not give back
R. Joseph Newton wrote:
Better just to respond to the situations as they arise. Sometimes this will mean
pointing a person back to a recent thread that they *really
should have* read themselves before posting. Sometimes a thread may also lead to
other questions about the approach a person is
Erik Rieselbach wrote:
Hi,
Can anyone explain to me why I would get a perl error in one web browser but
not in any others?
This depends on on alot of factors, few of which you are sharing.Generally, perl
errors should not come through to the browser. IIS does pass error messages
through by
On Tue, Mar 09, 2004 at 01:54:29AM -0500, WC -Sx- Jones wrote:
I agree - so I am totally talked out of the 'how to' thread.
Oh :( I kinda liked them. It meant that if I knew I wanted to do
something, and I knew that there was a how-to out there, I also knew
they would have a meaningful subject
76 matches
Mail list logo